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“Every PET owner 
should read it” 


“The PET Companion” is 
a fascinating collection of 
essential PET information 


from the pages of 


Microcomputer Printout. It 
contains all of the editorial 
from the 1979 & 1980 
issues, including 105 PET 
programming hints and 
tips, 116 news reports, 
reviews of 54 peripherals 








Chuck P eddle, Inventor of the PET 


Some of the topics covered: 


PROGRAMMING THE PET 


Double Density Plotting 
Modular Programming 
Programming Style 
Graphics 

Subroutines 

Sorting Out Sorts 
Tokens 

The Game of LIFE 
Tommy's Tips 

ROM Addresses 


THE SOFTWARE 


Business Software Survey 
Cosmic Invaders 

Superchip 

PETAID Do-It-Yourself Database 
What’s Wrong with WORDPRO? 


HARDWARE REPORTS 


The New ROM Set 

CBM 8032 SuperPET 
CompuThink Disk Drives 
Hardware Repeat Key 

High Resolution Graphics 

The Commodore Printer 

How the Keyboard Works 
AIM161 Ato D Convertor 
Commodore's 3040 Disk Drive 
PET’s Video Logic 

Colour for PET: The Chromadaptor 


THE SPECIAL REPORTS 


PET in Education 

PET Show Report 

The Jim Butterfield Seminar 
Hanover Fair Report 

PET In Public Relations 
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Yanging from lig ht pens tO Photography Course Commodore’s New Technology 
‘ ; Who Do You Want To Be?: Fantasy Future Shock: Forecasting The 
printers and 2/ major Games Future 


Commodore's Assembler Develop- Speech Synthesis 
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To: Printout Publications, P.O. Box 48, Newbury RG16 OBD. Tel: 0635-201 131 
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For the best PET software... 


COMMAND—O..... For Basic IV CBM/PET, 399 fimctions £59.95 + Vat 
with improved "Toolkit" commands 

DISK~O-PRO.... For Basic I PET, aids 25 commands £59.95 + Vat 
including Basic IV, in one 4K rom 

KRAM..ceeceese For any 32K PET/CSM for retrieving £86.95 + Vat 
disk data by KEYED Random Access 

SPACEMAKER IV For any PET/CBM, wmumts 1-4 roms £29.95 + Vat 
in one rom slot, switch selection 

" USER I/O For software selection of up to 8 £12.95 + Vat 
roms, in any two Spacemaker Quads 

PRONIO—PET.... Soft/hard reset for 40-colum FETs £9.99 + Vat 


SUPERKRAM, REQUEST & KRAM PLUS will be available shortly 





Next Month 







Next month sees the return of Disk Use for Begin- 
ners (back by popular demand), as well as the next 
in our series of articles on how to write your own 
compiler. The story of how your editor bravely 
trod into darkest Birmingham to unearth a com- 
pany with more than 60 PETs is also revealed. 

Reviews next time concentrate on Commodore’s 
new software product The Manager, and how one 
first time user coped with it. 















We are sole UK Distributors for these products, which are available 

from your local CBM daler, or direct from us by mail or telephone 
order. To order by cheque write to: Calco Software, FREEPOST, 
Kingston—upon-Thames , Surrey KT2 7BR (no stamp required). For same-day 
Access/Barclayeard service, telephone 01-46-7256. Official orders 
accepted from educational, govermment & local authority establishments 






As ever, Jim Butterfield will be regaling us with 
his own brand of computeristic wisdom, and we’ll 
have the usual mixture of programs in Basic and 
Machine Code, for the beginner as well as the ex- 
perienced user. 








...at the best prices! 






es Sl i es ar a ~ ret = The special section returns it’s attentions to the 
WORDPRO II PLUS RRP £125 less £31.25 = £93.75! role of PETs in education, and features a report on 
VISICALC RRP £125 less £25.00 = £100.00! how one school acted as a test site for the new 
TOOLKIT Basic IV RRP £34 less £9.50 = £24.50! 

TOOLKIT Basic IZ RRP £29 less £7.25 = £21.75! SP9000. As well, we have the complete up-to-the- 









minute list of educational workshops both in this 
country and abroad, and also, for the first time, a 
list of regional, independent user groups, along 
with where and when they all have their local 
meetings. 






The items above are available by mail or telephone order at our 
Speciat Offer Price when purchased with any ome of our software 
products. This offer is for a LIMITED PERIOD only. IK - ADD 15% VAT. 
OVERSEAS airmail postage - add £3.00 (Europe), £5.00 (autside Europe). 


Lalco Sottwere 


Lakeside House — Kingston Hill - Surrey - KI2 7Q% Tel 01-%46-7256 










See you next time! 











Editorial 


it’s Christmas time again, so before moving onto this month’s magazine, let me wish you all the best for 
Christmas, and the New Year. I hope you all have a good time. 

First of all, let me apologise for the lack of the beginners guide to machine code in the last couple of 
magazines : it seems we’re fated never to learn the intricacies of this, at first, daunting language! Our first 
series ended when its author, Paul Higginbottom, emigrated to Canada. When the American newsletter, 
Interface, started producing a guide, I started reproducing that guide here : however, over the last couple 
of issues of Interface the guide hasn’t appeared, which left me in the position of having no article for you. 
My apologies for that, and, as last time, all I can say is that I’ll endeavour to find another alternative 
source. We’ll find out one day! I’ve tried to find out from the States what happened, but as yet have no 


news for you. 

As ever, if you’ve any contribution 
to make to the magazine, big or small, 
I’d be delighted to take a look at it. In 
particular, an article on machine code 
programming would be most 
welcome : there’s a considerable need 
for more understanding in this area, 
so for any program or article you’ve 
written, you can reach me at the ad- 
dress below. 


The Editor 

Commodore Club News 

675 Ajax Avenue 

Trading Estate 

Slough 

Berks 

To subscribe, a cheque for ten 

pounds (or 15 pounds if you're 

overseas) will gurantee you a years 

(12 issues) supply of magazines, star- 

ting from the end of the month you 

send your cheque in : keep yourself in 

touch with the world of Commodore! 
No more for this month, the 

magaine’s big enough as it is. Don’t 

drink too much on New Year’s Eve! 


Audiogenic Present New 
Software for the VIC 


Enthusiastic Reading company 
Audiogenic (see back cover of this 
magazine for address and ‘phone 
number) have just produced a new 
PETPack catalogue full of software 
for the PET, including new versions 
of many of the arcade games, which 
now work on the 80 column PET. 
They’ve completely re-designed the 
old Commodore PETPack Master 
Library, and now present an attrac- 
tive range of inexpensive packages. 
Ask them for a catalogue! 

However, the main reason for 
writing about Audiogenic is the large 
number of VIC programs that they’re 
selling, the vast majority of which 
will run on the standard VIC without 
any memory add-ons etc. Hopefully 
the catalogue descriptions I saw will 


change : Americans are all right, but 
my goodness their catalogue descrip- 
tions are horrendous! I quote just one 
example, from a game called Satellites 
and Meterorites. ‘Your stalwart 
defense may take you near the 
greatest danger of all - THE BLACK 
HOLE. You realise the gravity of the 
situtation.”’ Thankfully, the game is a 
lot better than the write-up. 


Arcade Games 


As was probably inevitable in the 
early days of the VIC, the programs 
tend to concentrate on VIC imper- 
sonations of many well-known arcade 
games. The ever-present Space In- 
vaders of course, given a new twist 
(and a new title) by appearing this 
time in 3D. Other games with exotic 
titles include Spiders of Mars : no, 
nothing to do with David Bowie, you 
are a Space Fly trapped by a horde of 
Martian Spiders, and desperately try- 
ing to escape. Amok features a lot of 
robots, and “a legless, bouncing 
glob’”’, whatever a legless, bouncing 
glob may be : a glob that’s had one 
over the eight prehaps ? 

Pac It In, a version of the currently 
popular Munchy Men (or whatever 
it’s called in your area), Robot 
Blasters and Astro Transporter com- 
plete the game line up. All use full 
colour and sound of course, but the 
one thing I can’t tell you at the mo- 
ment is the price : all will be revealed 
in due course. 

The othe programs tend to concen- 
trate on the educational side of the 
VIC, and there are a couple of 
programs for teaching spelling, gram- 
mar etc. 

Finally we come to 2 programs by a 
gentleman who appears to be 
something of a VIC programming en- 
trepeneur, namely one Len Sasso. 
ViCalc, the first in a series of 
calculator programs for the VIC, has 
ten memory registers and four stack- 
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ed data registers all visible on the 
screen at all times. Basically, almost 
Visicalc but not quite! All calcula- 
tions are performed instantly. His 
other program is VPM, or VIC 
Securities Portfolio Management. As 
might be gathered from the title, it 
looks after stocks and shares. 

So there you have it : a whole new 
series of programs for the VIC. 


Job Vacancies 


To round off with Audiogenic for 
the month, there are currently two 
vacancies going there. The first is for 
a Salesman for VIC and PET soft- 
ware, and the other is for a Produc- 
tion Co-ordinator at their plant in 
Reading. For further details of both 
jobs contact Martin Maynard, direc- 
tor of Audiogenic, on Reading (STD 
Code 0734) 595647. 

As a footnote to the Audiogenic 
story, their resident superstar Martin 
Maynard recently flew over to Los 
Angeles : just cruising down to L.A. 
for the weekend, as superstars are 
wont to do from time to time. The 
purpose of the visit was to find out 
about new VIC software, and bring 
back a whole range of goodies to look 
at. 





Again, a mixture of arcade games, 
educational programs and home 
Management are the name of the 
game. Probably the most exciting 
development is a product called 
VICTERM, which, as you might sur- 
mise from the name, turns your VIC 
into a terminal, and allows you to log 
onto Bulletin Board (amongst other 
things) via the telephone lines. 
Another aid, as opposed to a pro- 
gramme is a little gem called BUTI 
(Basic Utility ROM), which is essen- 
tially a VIC equivalent of the world 
famous Toolkit. As Martin himself 
said, the original chip BUTT. Sorry ... 


Home Management 


Onto home management, we find 
programs such as VICAT, short for 
Viable Catalogue. This is a tape based 
data base system, and can handle up 
to 99 files. Similar in name if not in 
nature is VICHECK, a cheque book 
management program. It seems that 
more and more of this type will be ap- 
pearing as VICs begin to increase 
their user-base. At present the majori- 
ty of the software is coming from the 
States and Japan, where VICs have 
been around for a while, but we ex- 
pect Britain to catch up very shortly. 

Education will again be an area 
where, at present, most of the soft- 
ware is coming from outside, but with 
an increasing amount coming from 
the U.K. as time goes by. Some of the 
American programs from Audiogenic 
include Super Additon and Super 
Hangman, where, according to the 
catalogue description anyway, the vic- 
tim is hung against a setting sunset. 
Sky Math and Sky Division are two 
further programs, which are a 
mathematical equivalent of Space In- 
vaders. Numbers appear across the 
top of the screen, and you’ve got to 
shoot the correct numbers down. 


Games 


Finally, onto the games. As usual, 
some of the names in their original 
American form leave a lot to be 
desired. Master Whip, for instance, 
conjures up somewhat bizarre images 
to say the least. In reality it is quite 
tame however, being a version of the 
famous Mastermind. Kiddy 
Checkers, whilst not being quite such 
a bad name, lacks that certain flair 
somehow. Still, you can at least guess 
what the program’s all about. 

Blastoids, as you might probably 
guess, is a version of the popular 
Asteroids, where hordes of space 


debris fly around the screen and 
you’ve got to both avoid and destroy 
them, whilst doing the same to the lit- 
tle space ships that appear from time 
to time. Amazein again is fairly 
logical : a maze game. 

Last, but certainly not least, the 
game of games, a little gem called 
Alien Blitz, which Martin assures me 
is ‘‘the greatest game of all time’’. I'll 
be bringing you a full review in due 
course, in which we’ll put this claim 
to the test! 


Additional news on Wordform 


One of my complaints about 
Wordform, in the review in the Oc- 
tober issue of the newsletter, was the 
fact that if you were a very fast typist 
you would occasionally find yourself 
getting ahead of what was appearing 
on the screen. This has now been 
cured, and that cure is amazingly sim- 
ple. The POKEs listed below will 
solve all problems. 


For 8000 series machines, 
POKE4659,6 

For 4000 series machines, 
POKE4657,6 

For 3000 series machines, 
POKE4653,6 

and then re-save the program. This 
then keeps up with even the fastest 
touch typist. 

The reason why only one POKE is 
required is that originally a delay was 
put in to stop the average slow typist 
(i.e. me) who occasionally hit a key 
too hard, from getting two of each let- 
ter on the screen. The above POKEs 
remove that delay. 

Another comment I made was the 
lack of Wordform’s ability to print 
form letters, i.e. having the form let- 
ter in the main text area, and all the 
personalised information (name, ad- 
dress, Dear Bob etc.) lying in extra 
text (or storage buffer). Well, I did 
Landsoft a disfavour there. Having 
spoken to Ted Landsler of Landsoft 
the other day, I’ve now been shown 
how to perform this particular aciton, 
Of course, it’s very easy, and it’s in 
the manual if I’d burrowed far 
enough into it. Sorry Landsoft : it 
makes Wordform even better! 

The author of Wordform was 
recently taken to our distributor in 
Israel, on an all expenses paid trip, to 
convert Wordform to Hebrew! The 
flight was paid for, accomodation 
paid for, the entire works. And, of 
course, he also got a fee for doing it! 
Having completed the conversion it 
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now runs succesfully in Hebrew. 
Does this mean it runs backwards (or 
should that be backwords ?!) 

I’m also informed that Wordform 
2, a distinctly up-market version of 
the program, will be available from 
January 1982 onwards, for something 
under 200 pounds. It is claimed that 
it does it all. We'll let you know! 


Reviews : Invaders in ROM, 
from Supersoft 


A parcel arrived in the office-the 
other day, containing yet another 
ROM! ROMs abound these days, and 
the sight of another one was enough 
to drive one to despair. However, 
despair was not to be the case : this 
ROM replaced one of the existing 
PET ones, and so didn’t mean con- 
tinual swopping of Toolkits, Powers, 
Faster Basics etc. 

The ROM that bit the dust was the 
UD7 one, and with the insertion of 
the latest Supersoft ROM none of the 
PET’s normal functions were lost, 
and a very important one was gained : 
the ability to play Space Invaders, ac- 
cessed with just one command! 

The idea of changing one of the 
PET’s ROMs for a custom built one 
is a very good one. Generally you will 
find a fair amount of space in any of 
the ROMs inside the beast, and it 
seems reasonable to put the space to 
its optimum use. This removes the 
need for Spacemakers, Rompagers 
and the like, whilst keeping the PET 
(at least as far as it is concerned) to all 
intents and purposes as a normal 
PET. 

Thus all the programs that you’d 
been used to using before will still 
quite happily run in the normal 
fashion, but if they’re written in 
Basic, and the STOP key is still 
enabled, you can break into your pro- 
gram, type SYS 59648 and hit 
RETURN, and hey presto! Invaders 
is at your command. 

This is best done when no-one else 
(management preferably) is around, 
since the program uses the 8032’s (the 
only machine for which this chip is 
currently available, for a very impor- 
tant reason) internal speaker to 
generate the usual infuriating space 
game noises. 

Better yet, the program uses the 
whole of the 80 column screen, to 
give us the first commercially 
available arcade game on the 80 col- 
umn PET. Its use of graphics is very 
good, and the game as a whole is quite 
exceptional, considering it all fits into 





about 2K of code. 

To get back into your original Basic 
program, at any point in the game all 
you’ve got to do is hit the left arrow 
key, and there you are! Clear the 
screen, type CONT and away you go 
again. From dreary accounting 
packages, to a few minutes of joy 
blasting aliens to smithereens, and 
then back to the accounts program 
when the boss re-appears. All it 
needs now is a link to Wordpro and 
Wordcraft and they’re away! 

What else can I say ? A superb 
game, and at only 19.95 it looks like 
Supersoft have got another winner. 
‘Phone 01 861 1166 for further 
details. 


Technical Software 


The Technical Software Centre, bas- 
ed at BHRA Fluid Engineering, is 
carrying out a survey of technical 
software for desk-top computers on 
behalf of the National Research 
Development Corporation (NRDC). 

It will identify programs written by 
individual engineers and designers to 
solve particular technical problems 
with a view to assessing and adapting 
suitable programs for general use. 

Suitable programs will, after 
testing, be produced in TSC’s TEC- 
PAC format as Commodore Approv- 
ed Products. 

Authors and users of ‘in-house’ 
technical software written for Com- 
modore computers are invited to con- 
tact Tony Swann, Senior Engineer, 
at: 

BHRA Fluid Engineering, 
Cranfield. 
Tel: 0234 750422 


Attention All Software Editors 


(The following letter should speak for 
itself) 
Dear Mrs Gulliford, (CPUG) 

Having recently been appointed Pro- 
grams Editor of “Personal Computer 
World’, my first job 1s seeking out 
original programs for all sorts of 
micros, not only in Basic but also in 
Pascal (as you are possibly aware we do 
not publish Machine Code as the listings 
are too long. Assembler 1s covered in 
PCW Sub Set). 

It 1s for this reason that I write to 
you. Although we do get a fair number 
of programs from our readers, a lot of 
them are full of bugs and still more are 
games or applications that turn up over 
and over again. I’m sure that among 
your members you must have at least a 





few talented programmers who would 
like to have software published — 
naturally we pay for it at good rates — 
and in view of this I’d like to hear from 
them. 

I would be grateful 1f you would men- 
tion to your members that I am looking 
for as much good amateur software as I 
can get on behalf of PCW and that we 
also have a paid referee register going 
for those (who know what they’re at) 
who would like to check programs and 
provide listings from cassette and disks. 
Anyone interested is more than welcome 
to write to me at the address below. 


Maggie Burton 

Personal Computer World 
14, Rathbone Place, 
London W1P 1DE 


VIC meets the Stars 


Despite splitting the proton a while 
ago, myself and Chris Palmer (VIC 
Centre supremo) decided once again 
to boldly go where no man has boldly 
gone before (Warwick Avenue tube 
station), and set the controls for the 
heart of the BBC Radiophonic 
Workshop : the place where most of 
the wonderful soundtracks for the 
BBC are produced. 

Unlike our last jaunt with the BBC, 
somewhere in the wilds of Ealing, 
this journey presented no problems in 
the form of getting up early. Indeed, I 
ended up leaving Gerrard Acres later 
than I normally do for work, and had 
great pleasure watching everybody 
else squelching to work through the 
rain whilst I remained in the warmth 
listening to the Blue Ridge Rangers 
and drinking my cup of coffee. By the 
time I had to leave to foray forth to 
Taplow station the rain had decided 
that it had had enough for the day, 
and all was nice and dry. 

From Taplow station to the VIC 
centre was a model journey, helped 
by the fact that the train, like myself, 
was somewhat late in arriving at 
Taplow. Perhaps, as someone once 
said, if British Rail re-scheduled all 
their time-tables by 13 minutes all 
their trains would run on time. But I 
digress. 

The VIC Centre was very easy to 
find, and conveniently situated next 
to a pub and a betting office. I wonder 
who decided it’s location ?! The front 
half of the shop is the actual 
showroom area, filled with VICs and 
a very vast array of books on 
microcomputers programming 
them, choosing one, and so on. If 
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you’re interested in visiting the VIC 
centre, they’re at 154 Victoria Road, 
in Acton, London W3, or give them a 
ring on 01-992-9904. 

Around the back of the showroom 
is the area where all the work gets 
done : cigarettes and cups of coffee 
abounded. A mixture of VICs and 
PETs, all intgerwoven with an array 
of disk drives and printers, were 
much in evidence. Also much in 
evidence were ringing telephones : 
they hardly ever stopped! We manag- 
ed to escape however, and set off for 
the readiophonic workshop. 

Arriving at Warwick Avenue, we 
discovered where taxis go to die. 
There were hundreds of them, all 
driveless, moping in a large group 
near to the station. One of them even- 
tually moved, and we duly arrived at 
the BBC. 

And what, you’re probably asking 
by now, was the purpose of all this ? 
The BBC just acquired a fabo syn- 
thesiser, all 15 grands worth of it, and 
we thought they might be interested 
in a low cost micro to produce some 
of the lesser sounds and thus leave the 
big machine free for the work it’s in- 
tended to do. So, we gave them a 
demonstration of a VIC making 
various burbles and gurgles : we put 
it through its paces. When we men- 
tioned speech synthesis they were all 
impressed, but then we said we 
hadn’t got one there to demonstrate, 
so we were back to square one. Then 
we mentioned SID (Sound Interface 
Device), and they were all impressed 
again, and then we said we hadn’t got 
one to demonstrate, so back to square 
one again. 


We promised to come back again 
when we’d got the various extras, and 
they agreed that they would be very 
interested in VICs’ but as it stands at 
present they’ve got more than enough 
machinery to cope with whatever 
noises they desire : speech synthesis, 
and something like SID at the price, 
they most certainly would want. We 
will return! 


After our demonstration we were 
treated to a tour of the workshop, and 
saw more synthesisers than I’ve ever 
seen in my life before. We also heard 
some harrowing tales of productions 
in the past. To quote one example, 
the second radio series of Hitch 
Hikers Guide to the Galaxy was 
originally going to go out one episode 
a week, for seven weeks. This was 





fine, all the scheduling was done and 
people started getting on with the 
work. Then, a change of plan : it was 
going to go out on successive nights, 
and seven weeks work had to be done 
in seven days! By virtue of not sleep- 
ing for three days the final episode 
was finished half-an-hour before 
transmission. 

And so, as in all these expeditions 

with young Lim-Bim-Wim-Bim 
Palmer, we repaired to the pub for 
lunch : a pint of Burtons and some 
food (note the order!). Another mis- 
sion accomplished. 
Our other encounter with the stars, 
and to prove that we’re unbiased, was 
a visit to ITN, just off Oxford Circus. 
Long after deciding that Oxford 
Circus was not the most intelligent of 
places to meet someone (five exits and 
half a million tourists) Chris Palmer 
and myself finally met up, and retired 
to a hostelry for lunch, and to plan 
our campaign for the afternoon. 

After losing lots of money on the 
local version of Space Invaders (Cen- 
tillion, for those of you in the know), 
we went over to ITN, and arrived to 
be greeted with the words “Do you 
fancy a drink in the ITN Bar ?” 
Never ones to say no, we trotted off to 
the bar in the hope of meeting a 
galaxy of stars, talent scouts etcetera, 
cursing the fact that Anna Ford had 
left ITN. Well, I’m still an editor, 
and Chris is still working for the VIC 
Centre, so I think we can safely 
assume that we’re not going to be 
‘discovered’ this year. We did en- 
counter fruit machines with jackpots 
of 100 pounds, but only succeeded in 
losing yet more money. 


The purpose of this visit was a 
meeting of the ITN Computer Club, 
and a demonstration of the VIC. Ap- 
parently (we were told afterwards) the 
meeting had been visited by a couple 
of ITN’s managing directors: an 
unheard of event, seemingly. 

I think we scored with them, as the 
demonstration went very well, and 
most of the questions fired at us were 
fielded admirably. We spotted the 
potential troublemaker (There’s 
always one!) within seconds of star- 
ting, but in the end he was turned to 
our advantage, by the simple expe- 
dient of answering his questions, 
however technical and complex they 
got. In particular, he even started 
talking about some computer he’d got 
that could do this, that and the other, 
whereas the VIC couldn’t. This was 


all very well, I suppose, but when we 
pointed out the fact that his machine 
cost around ten times as much as the 
VIC, even the rest of his colleagues 
started to laugh. Fifteen-love, as they 
say. 

We gave a run-down on sound, col- 
our, graphics, altering characters and 
all the other features of the VIC, and 
in the end convinced them that as a 
low cost introduction to the world of 
microcomputing the VIC was the 
machine to buy. Mind you, we were 


people there had made their own 
computers, and were quite naturally 
slightly biased in favour of their own 
particular, individual machine. We 
even managed to convince one or two 
of them that the VIC was a useful 
machine. 

So out of our two visits, we ac- 
quired one success and one possible 
success on a future visit. Not bad real- 
ly, and thus suitably impressed by our 
work we took the only course of ac- 
tion possible; we got ourselves a 
drink! 


fighting a battle; quite a few of the 


Do you want to advertise 
Second-Hand equipment? 


eeeeeveeneeceeeeeeeeeoeeee ee eeeeeeeecee eee eecseeeeeeseeeseeseseeseeeaeeceeeeceeseceeoeeeocaescaesceeoenceeceoeoeesneeoeeeeeeeeneveeees 
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Please fill out the form above if you wish to advertise second hand 
equipment for sale in Commodore Club News. Entry costs just £1.00 
(cheque or postal order), and return it to: 

Peter Gerrard 

Commodore Business Machines 

675 Ajax Avenue 

Slough, Berks. 


C.B.M. (U.K.) Ltd do not accept any responsibility for the products 
advertised hereunder and prospective purchasers should satisfy 
themselves in respect of any representation made. 


Second-Hand Corner 


The following advertisements have been received: 

Dual Drive Floppy Disk CBM 3040, fitted with up-to-date DOS + soft- 
ware. Price £750. Taher Mahmud, 41, Comely Bank Road, Edinburgh EH4 
1EJ. Telephone: (031) 332 6406 


Midlectron M62 Papertape Punch/Reader as new. Run only for testing. 
Price £800. K.A.Mander, 17, Beacon View, Marple, Stockport, Cheshire SK6 
6PX. 


Wanted — 3000 Series computer and/or Floppy Disk Drive and Printer. 
Frank Pickles, 13 Central Drive, Bournemouth BH2 6LQ. Tel: 0202 293650. 


Commodore Tractor Printer 3022, Price £250. V.E. Marshall, 33, Tur- 
more Dale, Welwyn Garden City, Herts AL8 6HT. 
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My next project was a simulation of 
chemical process control. I assumed 
that a chemical reaction heated up at a 
rate of 10 degrees per second and 
simulated this with a FOR/NEXT 
loop with a T=T plus 10 condition 
so that the temperature T was printed 
every second. If T exceeded 110 
degrees an explosion was assumed to 
occur (and you graphics experts can 
have a field-day!). To control the reac- 
tion a coolant pump can be switched 
on which causes the condition T=T 
-10 to replace T plus 10 so that the 
printed out temperature now drops. 
If it goes below -10 then the mixture 


Figure 6 
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freezes (more graphics). Correct 
operation of the switch enables the 
reaction to continue.... The status of 
the switch was read by PEEK(59471) 
= S. If S was equal to 254 then cool- 
ing was assumed to be taking place 
and T was set to [-10. 


I then decided to use the Com- 
munikit to check the operation of a 
555” timer. This simple and cheap 
device is very useful and easily ob- 
tained. The circuit I used is given in 
Figure 6, the LED is merely present 
to help monitor what is happening. 
For the same reason I slowed the pro- 


+4:5 VOLTS 


REM: :: TIMER PROGRAM: : : 
H=59459 - AEZ99 :=5S4e 1 
POKEN, 255: POKEH. #-1 
FORI=1T018@8:HEXT 

POKEN, X:FOQRI=1 TOSG@: HEXT 


B=TI 
IFPEEKCY>>1 THEN? 
C=TI 
9@ PRINT"TIMNE ELAPSED = 
166 GOTOzA 


gram down with FOR/NEXT loops 
and kept the program as simple as 
possible. 

A puzzle from PA O (output) was 
used as the trigger to start the timer 
while the output from the timer was 
fed to PA 1 (input) and monitored as 
in the previous program. To my great 
surprise the system worked im- 
mediately (NOT my usual experience 
with electronic circuits) and I checked 
the time difference found by the PET 
with the time by theory. Since it was 
not in very good agreement I wrote a 
program so that the test was repeated 
10 times and the result averaged. I 
then tried checking several different 
resistors and soon found the source of 
the error. It was simply the plus or 
minus 10% tolerance expected of a 
cheap resistor! I had therefore 
calibrated my test capacitor. The ob- 
vious next step was to try several dif- 
ferent capacitors against my 
resistances .... and so on. I then had a 
set of calibrated R’s and C’s which I 
arranged so that they could be switch- 
ed in at will using an 8 position DIL 
switch and I had made my own 
multimeter. What next? Any devices 
which showed a change of resistance 
could be incorporated, thermistors, 
an ORP 12 (a light dependent 
resistance) or a level indicator based 
on conductivity changes were first to 
come to mind. 

Since I knew or could easily find 
out the approximate resistance of my 
device all I had to do was switch in 
the appropriate capacitor and I was 
away. My thermistor had a room 
temperature resistance of about 60 K 
ohms which dropped to around 16 K 
ohms at 50 degrees Centigrade. I 
wrote a program to represent the time 
difference as a bar-chart so that I had 
a recording thermometer. (see ‘“REC- 
THERM”’’) (overleaf). 

The ORP 12 had a very high 
resistance in the dark and very low 
resistance in normal electric light so it 
was very easy to detect if a light was 
turned on (burglar alarm ?). I found 
that it would detect the light from an 
L.E.D. and could even “‘see’”’ the dif- 
ference in brightness between the 
print and dark parts of the video 
screen or between the light from a 
black or white strip of paper. I also 
could make a light pen it seemed. 

And finally a project still (ap- 
propriately) on the drawingboard....a 
drawing-pad. This could consist of a 
sheet of special resistance paper or an 
ordinary sheet of paper soaked in salt 





solution. Electrodes in strip form 
would be placed along two edges at 
right angles and connected in turn to 
PA 1 and PA 2 (PA 0 would still be 
the trigger). Each connection would 
measure the resistance between a 
stylus and the electrode connected. 
The resistance is a measure of the 
distance of the stylus from the elec- 
trode or in other words the X and Y 
co-ordinates of the stylus postion. 
This position would then be plotted 
on screen and the stylus moved on. 
The principle could be tested with a 
BASIC program but to be of any real 
use machine code would have to be 
used. 


RECTHERM CRECORDINHG THERMOMETER? 


S N=59459:X=255: y'=59471 
16 POKEN, X-1 

26 FORI=1TO1G@@: NEXT 

3@ PQOKEN, X 

46 FORI=1T0506 : NEXT 


45 B=T 
20 IFPEEKC'Y)>1THEHS@ 
39 C=TI 
66 T=C-B 

78 GOTO1LG6 

108 A=32768 

110 FORI=1TO39-T:FRINT "x"; > HEXT 


126 POKEA.48:FORI=1T09:FOKEA+I, 32: NEXT 


136 POKEA+11,49:POKEA+12,49:FORI=1T03:POKEA+tI, 32: HEXT :POREA+2S1,.59 > POKER+22, 42 


16@ PRINT 
178 FORI=1TO56@:HEXT 
189 S=$+1:IFS=23THEHPRINT "TI" 
19@ IFS=23THENS=0 
20@ GOTOS 
FOOTNOTE. A “555” timer cir- 
cuit is shown on p 93 of the PET 


Revealed together with a machine 


First Programming Steps. 


The first programs that a beginner 
writes tend to be simple. That’s good, 
of course: the programmer is develop- 
ing skills which will be useful when 
he tackles more ambitious jobs. Here 
are a few suggestions on how to go 
about these early projects; the em- 
phasis will be more on sound prac- 
tices and clear style rather than clever 
coding methods. Some of the sugges- 
tions might be useful for experienced 
programmers, too... 


Try to lay out your programs in 
“‘blocks’’. Each block should have a 
clear, simple function. One block 
might do an input job, another might 
calculate, and a third generate output. 
If you start planning a program by 
thinking out the blocks you will need, 
your program will be better planned. 
Some programmers make each block 
into a subroutine so that the main 
program simply calls in these units as 
needed. 

Title each section or block with a 
remarks REM statement. You don’t 
have to put comments on each line, 
but it’s useful to be able to find a sec- 
tion of code quickly. Perhaps you 
think that you can remember the code 
- after all, you wrote it - but wait a 
couple of months. It’s amazing how a 
crystal clear program can suddenly 
become gibberish after you’ve been 
away from it for a while. Leave 
yourself some highway markers so 
that you can find your way around 
later. 

Name your variables in a semi- 
meaningful way. Totals can start with 


the letter T, counts with a C, and so 
on. I’m not a fan of large alphabetic 
names, since they have pitfalls: TER- 
RIFIC is a great label, but it doesn’t 
work since the keyword IF is hidden 
in the middle. Can you find the hid- 
den keywords in GRANDPA, CAT- 
NIP, CRUNCH and FRONT? It’s 
fun to play word games, but not when 
you're trying to write a program. I 
prefer a single letter followed by a 
numeric: T4, B7 and so on. By the 
way, don’t forget that variable B has 
nothing to do with integer variable 
B% or string B$ or for that matter ar- 
ray variable B(3). They are all com- 
pletely independent values. 

Don’t ley anyone hustle you about 
program size or speed. If others write 
in less memory and fewer 
milliseconds, let them. You'll have 
space enough for most of your pro- 
grams and the tenth of a second saved 
in run time won’t give you time for a 
cup of coffee. On the other hand, do 
look for better methods. Better isn’t 
always faster or smaller, but you'll 
recognize it when you see it. 

Keep track of your variables; it’s 
useful to make a list on a sheet of 
paper. That way, you won’t acciden- 
taly use variable X for two different 
jobs and get them mixed up. In fact, it 
doesn’t hurt to do paperwork plann- 
ing before turning your computer on. 
There’s a kind of “‘heat”’ in working 
directly on the machine that 
sometimes leads to hasty programm- 
ing. A little leisurely planning 
befoehand can generate sounder and 
better programs. 


code count program. I am informed 
that line FO 07 BEQ TEST should be 
FO F7 BEQ TEST. 


Jim Butterfield, Toronto 


Don’t be afraid to write loosely. 
The fanatic who tells you that you’ll 
save memory and time by compacting 
FOR M = S TO P STEP V into 
FORM=STOPSTEPV is. steering 
you wrong in most cases. If legibility 
costs you four bytes and one millise- 
cond, take it: it’s a bargain. 

If your program doesn’t work right 
the first time, don’t lose heart. It hap- 
pens to most of us. The easy errors 
are where the computer tells you 
where the problem is, most common- 
ly SYNTAX ERROR IN ... The 
problem will likely be obvious when 
you look at the line, if not, you can try 
rewriting it slightly to see what hap- 
pens. The hard errors are where the 
computer doesn’t stop, but gives you 
the wrong answers. 

Debugging can be great fun if you 
take the right attitude. Look at the 
variables: you can call them up with 
direct PRINT statements. Change 
them if it suits your purpose. Put 
STOP commands into your program 
and check everything out when you 
come to the halt. You can resume 
where you left off with CONT. Us- 
ing the RUN/STOP key to break 
your program in mid-extension is less 
precise but will also do the job. 

Getting a program together can be 
a rewarding experience - not 
necessarily rewarding in money, but 
in a sense of accomplishment. Each 
program will be a work of art, done in 
your own style. When you put your 
signature to your latest masterpiece, 
you'll feel good about it if you’ve used 
good coding craftmanship. 


The Friendly PET - Screen editing Jim Butterfield, Toronto 





One of the friendliest things about the 
PET, CBM and VIC is the way they 
allow you to make a change or correc- 
tion. If the line on the screen is wrong 
- whether it is a program line or a 
direct command - we can move the 
cursor back and type over the line. 
Pressing the RETURN key will make 
the change take effect. 


Correcting Programs 

This is very handy for programs. 
When your first program attempts 
result in a message such as ?SYN- 
TAX ERROR IN 350 you can list 
350 to see what the trouble is. If line 
350 happens to say PWINT X, you 
can move the cursor back, type R 
over the W to give PRINT X, and 
strike RETURN. The line has been 
corrected with a minimum of typing 
on your part. 

If you need to make an insertion in- 
to your program, you may use the IN- 
SERT key. If the mistake was PINT 
X, the technique is to position the 
cursor over the I, hold down the 
SHIFT key, and press INST for in- 
sert; the computer will open up space 
and you can type in the missing R. 
On the other hand, if the error was 
PHRINT X you’ll want to make a 
deletion: place the cursor over the R, 
press the DEL key to delete, and the 
H will disappear. In either case, don’t 
forget to press RETURN to make the 
change permanent. 

If you happen to goof in making the 
change, start over. In this case, don’t 
press RETURN. Hold down SHIFT 
and then press RETURN: this will 
take you to the next line without any 
program change being made. Shifted- 
RETURN is quite a handy key com- 
bination to know for many reasons. If 
you wanted to leave a note on the 
computer’s screen for someone to 
read, you might type MARY - PUT 
THE CAT OUT. At this point, strik- 
ing RETURN would cause the com- 
puter to try to “‘perform”’ the line, 
and you’d get SYNTAX ERROR. If 
you press Shifted-RETURN, 
however, you’ll just go to the next 
line and the computer won’t try to do 
anything with the contents of the 
previous line. 

The INSERT key has some special 
rules. After you have pressed the 
INSERT key a number of times 
(don’t forget to hold down SHIFT) 


there will be an open space on the 
screen where you can insert the new 
characters. At this point, you’ll be in 
“programmed cursor’ mode. This 
means that the cursor keys don’t 
move the cursor; instead they will 
print as special reversed characters. 
This is the same way that the PET 
behaves after you press the quote- 
mark, with two important exceptions: 
the computer remains in this mode 
only for the number of characters to 
be inserted; and the Delete (DEL) and 
Insert (INST) keys work in a different 
way. More about this another time; in 
the meantime, you’ll get used to them 
quite quickly. 

A problem sometimes crops up if a 
program line is too long. Sometimes 
this means that there’s no extra space 
available to make a desired insertion - 
eighty characters is the screen limit. 
Worse, the line is too long to start 
with; it occupies over 80 characters 
even before we make a change. It 
might be more sensible to change it to 
two lines and relieve the crowding; 
but if you must, the trick is to look 
through the line to find a keyword 
that can be abbreviated. PRINT is 
the most popular, since it can be 
rewritten as a question mark. Close 
up the space, making sure that 
everything is packed into the 
80-column work area, and then make 
the change if it fits. 


Direct lines - Basic commands 
typed in without a line number so 
they are expected right away - are 
usually easy to fix. If you mistype 
LOAD “PROGRAM?” so that it 
comes out LOUD “PROGRAM”, 
don’t be dismayed by the PSYNTAX 
ERROR. You can slip the cursor 
back, change the U to an A, press 
RETURN and the load will take 
place. 

Correcting mistakes in Direct lines 
can leave a cluttered screen. When I 
try to load BOTTLESHIPS from the 
disk, I got several lines which tell me 
that there’s no such program. When I 
move the cursor back and correct to 
BATTLESHIPS, the following lines 
don’t go away unless written over. It 
looks messy, but works OK. 

There’s a sharper problem when I 
coh - direct statement to print a 
number. If I ask the PET to calculate 
4*5*6, yielding a product of 120, and 
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then decide that I really want addi- 
tion, I can go back and change the 
asterisks to plus signs. The PET will 
now produce a total of 15, but the last 
digit of the previous answer won’t be 
wiped out; the zero will be left on the 
screen and our sum will look like 150 
instead of 15. The solution? Wipe out 
any numbers you want recalculated 
so that the new values will print on a 
fresh line. 


Special screenings 


When you press RETURN, the 
PET sees only what’s on the screen. 
You may have done deletions, in- 
serions, and changes but the final 
screen result is all that counts. This is 
true of program lines, direct com- 
mand, and responses to program IN- 
PUT statemens. 

You may want to run a program 
several times while testing, with 
similar answers to INPUT questions 
on each run. With screen editing, it’s 
a snap. After you have run once, 
move the cursor back to the RUN 
statement. Press RETURN (no need 
to type RUN: it’s on the screen). For 
each INPUT, the cursor will appear 
over the answer you typed on the 
previous run. If you want to go with 
the same response this time, just 
press RETURN and the program 
will accpet the same input from the 
screen. IF you want to change, type 
your new input. 

Here’s a hint of advance techniques 
that you’ll learn as you become more 
familiar with your computer. You can 
actually get the PET to type its own 
input - even its own program changes 
- to the screen. Then, with a stroke of 
the RETURN key, you can activate 
the input or program change. When 
used for INPUT activities, this pro- 
vides a “default’’ input for the user. 
As a program change, the program 
could suggest DATA statements that 
it would like to see included in a 
future run. Mind boggling! At this 
rate, the computer could program 
itself and make us all obsolete. 

At least, the computer still needs us 
to press the RETURN, key; it can’t 
do that by itself. Or can it? Technical 
tyros suggest that POKE 
158,1:POKE 623,13 (or on Original 
ROMs, POKE 525,1:POKE 527,13) 
would actually cause the PET to send 
a carriage return to itself... 














Half a dialogue - Inputting 


Fim Butterfield, Toronto 





Asking a program to go and get input 
from the user is a subtle thing for 
beginners. When you write your first 
program, it’s hard to look ahead and 
see the program independently com- 
municating with the user. “If the pro- 
gram needs a value, I’ll program it in 
right now ...” It takes a level of 
sophistication to imagine a program 
accepting working values at a later 
time, when it runs, and using dif- 
ferent values supplied by the user in 
different runs. 

There are three fundamental ways 
of checking what the user is doing at 
the keyboard: INPUT, GET, and a 
PEEK. We'll talk about each, and its 
uses. 


INPUT. 


The INPUT statement does a lot of 
work for you. It’s certainly one of the 
most powerful statements in Basic. 
Some of us would like to see it more 
powerful, and some would like to see 
it less sophisticated; for the moment, 
we'll have to accept it as it is. 

When you give the command IN- 
PUT in a program, a prompting 
question mark is printed and the cur- 
sor begins to flash. Your program is 
held in suspended animiation; it will 
not resume operation until 
RETURN is pressed. There’s no 
code which allows something like: 
INPUT M:IF (NO REPLY IN 15 
SECONDS) GOTO... 

Your code will hang on the INPUT 
statement forever if the user doesn’t 
reply. 

When the user presses RETURN, 
INPUT takes the information from 
the screen. It doesn’t matter if the 
user wandered back and forth, chang- 
ing, deleting and inserting, INPUT 
looks only at the screen which is the 
result of his actions. In fact, if there’s 
something on the screen that the user 
didn’t type, INPUT will take that 
too. This can be useful for promp- 
ting: you can arrange to type a sample 
response on the screen, and the user 
will then be able to press RETURN 
to have that response entered. As in- 
put takes the information from the 
screen, it trims away all leading and 
trailing spaces; other than that it takes 
the whole line, even though it may 
not necessarily need it. 


Now INPUT starts to plow 
through the line, digging out the in- 
formation you need for your pro- 
gram. If it’s looking for a number it 
will not like to find a string, and will 
ask, REDO FROM START. If it’s 
looking for a string it won’t mind a 
number at all: it will accept it as a str- 
ing. 











Road signs for INPUT. 


Whether INPUT is looking for a 
number or a string, it will stop its 
search when it finds one of three 
things; comma, colon, or end of line. 
If if finds a comma it will assume that 
more information will be needed later 
in the INPUT statement; if it finds a 
colon or end of line it assumes that 
there is no more useful input from the 
user. If it needs more, it will ask for 
if. 

Suppose you need to input a string 
that contains a comma or a colon, 
such as ULYSSES M PHIPPS, PHD 
or ATTENTION: JOHN, MARY. 
Since INPUT normally stops at the 
comma or colon character, we need to 
do something. The answer is easy: the 
user must put the desired input in 
quotes: “ATTENTION: JOHN, 
MARY” and the whole thing, com- 
mas, colon and all, will be received as 
a single string. 

Keep in mind that the INPUT 
statement allows prompting. INPUT 
“YOUR NAME”;N$ causes the 
computer to type YOUR NAME? 
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and wait for input. That’s a good 
human interface; help the user along. 

If'a user presses RETURN without 
supplying any information on the 
screen, programs on the PET/CBM 
will stop. There are several ways to 
prevent this from happening; the 
easiest is to add a “‘canned reply” to 
the input prompt message. When you 
are writing the INPUT statement 
prompt (such as YOUR NAME) add 
two extra spaces and, say, an asterisk 
character; then type three Cursor- 
Lefts (they will print as an odd- 
looking reversed bar) and close the 
quotes on the prompt. Finish the IN- 
PUT statement in the usual way: a 
semicolon behind the prompt and 
then the name of the variable to be in- 
put. Now: the askerisk or whatever 
will print to the right of the prompt 
and question mark. Unless the user 
Overtypes it, this character will be 
received from the screen as his input - 
and the proram won’t stop. 

One last comment: don’t forget that 
INPUT can accept several values. 
You can say INPUT N$,A$,C$ and 
allow the user to type JOE BLOW, 
CITY HALL, DENVER. It’s often 
better to use separate input 
statements: users can respond better 
when prompted for each piece of in- 
formation. 


GET and PEEK: a preview 

GET isn’t as clever as INPUT, but it 
has valuable uses. First of all, it 
doesn’t wait; if a key isn’t ready in the 
keyboard buffer, the GET statement 
lets Basic continue. Secondly, 
keystrokes received with GET don’t 
affect the screen unless you, the pro- 
grammer, decide to allow them to do 
so. This means that you have much 
more control over what the user can 
do. 

There’s a PEEK location 
PEEK (151) on most PET/CBMs, 
PEEK (515) on Original ROMs, and 
PEEK (197) on the VIC that tells you 
whether a key is being held down or 
not. This can be useful to avoid the 
situation where a user needs to press 
the same key repeatedly to cause some 
action; you can program so that the 
key repeats its action if it is held 
down. 

We’ll talk in more detail about the 
GET and PEEK in the next article — 
Reading Keys. 











Half a dialogue - Reading keys 


Fim Butterfield, Toronto 





We’ve already discussed the INPUT 
statement. When you do an INPUT, 
the program pauses and waits for the 
user to compose a line on the screen. 
When the user presses RETURN, 
the program resumes and uses the in- 
formation entered. 

This is often useful and convenient; 
but when we use INPUT, we don’t 
have complete control over the user. 
If the user doesn’t answer, the pro- 
gram is stopped forever, and other 
jobs will not take place. The user 
might also do undesirable things like 
clearing the screen, and might even 
stop the program if he _ presses 
RETURN without any input on the 
screen. 

We can deal with the user on a 
more elemental level by using the 
GET command. 


GET. 


GET takes one character directly 
from the keyboard buffer; the 
character does not go via the screen. 
It’s usually a good idea to echo the 
character to the screen so that the 
user can see what he’s typing (GET 
X$:PRINT X$;). There is a GET 
numeric (GET X) which gets a single 
numeric digit, but it’s rare since the 
program will stop if the user inadver- 
tantly presses an alphabetic key. 

GET doesn’t wait. If there’s no 

character in the input buffer, GET 
returns with a null string. We can 
wait for a key to be pressed with a line 
like: 
300 GET X$:IF X$=“ ” GOTO 300 
You can see that if we get no 
character, we go back and try again. 
More sophisticated versions of the 
same program might allow us to wait 
for up to 10 seconds for the user to 
type a key. 

GET receives everything typed at 
the keyboard. Even cursor movement 
or insert and delete keys are received 
as single character strings. The 
RUN/STOP key and the SHIFT are 
about the only keys that GET won’t 
receive directly. 

Screen control keys - cursor move, 
reverse, home, etc. - are picked up 
directly by GET and don’t influence 
the screen when typed. If you want 
them actioned, you’ll have to arrange 
for it yourself, again by echoing the 
character with a PRINT. On the 





other hand, GET is an excellent way 
to prevent a user from clearing the 
screen or doing other things that you 
don’t want. The easiest way to iden- 
tify such characters is by their ASC 
ascii value, but the obvious also 
works: GET X$:IF X$=HOME” 
GOTO... The Reverse-S symbol will 
appear where I have typed HOME. 

Sometimes there are left-over 
characters in the keyboard buffer. 
The user might have touched the 
keyboard accidentally, or the last key 
pressed might have “‘bounced”’ and 
been registered twice. You can strip 
out such characters with simple 
coding like GET X$,X$,X$,X$. If 
the keyboard buffer contains up to 
four characters, they will be cleared 
out; if there were none, GET still 
doesn’t hold anything up. 

Remember that GET takes 
characters from the keyboard buffer. 
For one key depression, no matter if 
you tap a key quickly or hold it down 
for five minutes, only one character 
will go into the buffer and GET will 
find it there only once. 


PEEK 


The value of PEEK (151) will tell 
you whether or not a key is being held 
down. If you find 255 there, no key is 
being pressed - except maybe the 
SHIFT key which doesn’t register 
there. If there is any value other than 
255 in PEEK (151), somebody’s 
holding down a key. 

Special note: for Original ROM 
PETs, the place to check is 


PEEK (515). And on the VIC, check 


location PEEK (197); a value of 64 
means that no key is being pressed. 


It’s possible to figure out which key 


Sue 
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is pressed on the value you find in the 
PEEK location, but I don’t recom- 
mend it. Different keyboards are 
“decoded” in different ways, and 
what works on one machine won’t 
necessarily work on another. The best 
way to sort out which key is pressed is 
to use the PEEK together with the 
GET statement. 

The trick is this: if GET says that 
there is no character in the keyboard 
buffer and PEEK says that someone 
is holding a key down, it’s safe to 
assume that the key being held down 
is the last one you received with 
GET. Timing is important here, 
since a key could be touched in the 
split second between two Basic 
statements. I recommend the follow- 
ing kind of sequence: 

300 X=PEEK (151) 
310 GET X$:IF X$ 
THEN X1=ASC(X$) 
:<GOTO 330 
IF X=255 GOTO (...NO 
KEY ACTIVE) 
330 .... KEY ACTIVITY 


This kind of test is very good for 
movement games, where you are 
directing something (a ball, a paddle, 
a tank) around the screen based on 
whether a key is held down or not. 
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Summary 


GET is more elementary than IN- 
PUT. You’ll need to do more work 
with GET, but you’ll have more con- 
trol over the user input. 

Use the PEEK where it’s necessary 
to find out if a key is being held down 
Or not ... it can give you a Nice inter- 
face, especially where the user would 
otherwise pound repeatedly on a key. 


ES 








The Group implementation of ‘large’ programs 


John Stout 





This article goes in to more detail 
about a proposal mentioned in the ar- 
ticle Basic Compilers, that of 
writing ‘large’ programs, e.g. a 
BASIC compiler for the PET, by us- 
ing a number of people, each with ac- 
cess to the required hardware, to 
write sections of the program so that 
any one person’s job is well within 
their capabilities and resources. 
Most software firms do indeed split 
up large jobs between individual pro- 
grammers since it is difficult for one 
person to retain detailed knowledge 
about every section of large programs 
such as operating systems. It is of 
course far easier to accomplish this 
when all the programmers are in the 
same organisation (sometimes under 
the same roof) and one of the first re- 
quirements for a group implementa- 
tion will be excellent communications 
between the members. A simple solu- 
tion using the postal services and 
floppy disks with the telephone for 
emergencies seems most practical. 
The sort of thing I envisage is a pair 
of floppy disks making their way 
from member to member, ‘each 
member taking off the disks the pro- 
grams and documentation written by 
other members and adding their own. 
For a large group this ‘chain’ would 
result in obvious delays and so an 
alternative ‘star’ could be adopted 
where one member of the group 
would act as a ‘librarian’ to whom 
each member of the group would 
send his/her own work and receive 
back copies of everyone else’s. Using 
member’s own disks and sending 
SAEs with each disk would mean that 
each member would pay their own 
way and thus avoid any problems 


Once upon a time, to a select group 
of attendees, an event of historic 
importance took place. Graham 
“‘Houdi’’? Sutherland, of Com- 
modore Business Machines, John 


Kyle-Price, of the Bristol Software 
Factory, and Richard Pawson, of 
Printout, made a very special an- 
nouncement. To an astonished 
world, Silicon Office was launched 
for the first time!! 








with finance. 

A second requirement for the 
project to have any hope of suc- 
ceeding would be the agreement of 
everyone involved to a set of stan- 
dards, for programming style, 
documentation and work. I have in 
mind such things as spaces after every 
BASIC keyword, no GOTOs to 
REM<d lines, REMarks at the start of 
every subroutine detailing purpose, 
variables used and so on. Documenta- 
tion should be distributed in machine 
and human readable form so that each 
member could be supplied with a sim- 
ple word processing program in order 
to read other’s documentation and to 
create their own. The program would 
be designed so that every person’s 
documentation would have the same 
structure although obviously dif- 
ferent contents. Similarly we would 
need standards of work, e.g. 
minimum number of hours per week 
otherwise a number of energetic pro- 
grammers could end up supporting 
the rest of the group. The aim of all 
these standards would be to have a 
situation where any member of the 
group could take over the programm- 
ing of any other member and con- 
tinue that work with as little wasted 
time as possible. 

Members should be able to take 
criticism since everyone’s work 
would be open to examination and 
evaluation by the rest of the group. 
Procedures for dealing with criticism 
would need to be worked out and an 
arbitrator appointed for cases where 
the two sides to an argument cannot 
come to some agreement or com- 
promise. Alternatively the group 
members not involved could arbitrate 





which would lead to a fairer decision 
but one which would take longer to 
reach. 

Another requirement, technical this 
time, would be a program to merge 
together member’s work from disk, 
either into memory or into another 
disk file and do this reliably time after 
time, coping with duplicate line 
numbers, out of memory errors and 
so on. It would be crippling to have 
completed one’s section of program- 
ming only to have it corrupted by try- 
ing to merge in some other section. 

Before the program gets under way 
the group members would need to 
come tO some arrangement about 
copyright and the possibility of sell- 
ing the program when completed. 
Sharing any profits equally, in the 
ratio of number of lines produced or 
in the ration of time taken are just a 
few of the financial ideas to be con- 
sidered. 

Among the projects amenable to a 
group implementation would be such 
things as compilers (each member be- 
ing responsible for the subroutine to 
generate code for a particular state- 
ment type), word processors (each 
member being responsible for the 
programming for a particular com- 
mand) and so on. Special interest 
groups could collaborate on such 
things as accounting software, sym- 
bolic mathematic systems (possibly 
using LISP) and financial modelling 
programs. As long as a clear division 
can be made between separate parts of 
the program and agreement reached 
on the points mentioned above, the 
philosophy of ‘divide and conquer’ 
can be applied to programming as 
well as to warfare. 











Forth coming 
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FORTH is something which I will 
readily admit comes under my list of 
things I know next to nothing about. 
So, the following article landed as a 
very nice surprise on the desk the 
other day, which was as ever snowed 
under with all kinds of goodies. If, 
after reading the article, you want fur- 
ther information, write to:— 


Peter A. Bengtson 

Software Development Manager 
Datatronic AB Sweden 

P.O. Box 42094 

S-126 12 Stockholm 

Sweden 


FORTH - The Language of the 
Eighties? 

How about a language that is in- 
teractive, structured, modular, exten- 
sible, very fast, compact, portable, 
supports virtual memory, works in 
any numeric base, allows you fo free- 
ly mix assembler and high-level code, 
cuts development time in half, and 
occupies just 8.5 kilobytes - in- 
cluding a resident macro assembler 
and a resident text editor? 

A dream? No - the language is 
FORTH, a not-so-new language that 
has been around for over ten years by 
now. It is rapidly gaining acceptance 
in wide circles thanks to the efforts of 
a FORTH Interest Group started in 
1978, now having 3000 members 
worldwide and growing all the time. 

FORTH was created by Charles H. 
Moore in 1969 at the National Radio 
Astronomy Observatory, Virginia. 
He was fed up with the tediousness of 
programming a computer at that 
time. Job Control Languages, Linker 
Languages, Macro Languages, FOR- 
TRAN, COBOL, PL/1, etc, etc. He 
wanted to replace all these languages 
by just one - FORTH. FORTH 
developed over a period of ten years, 
slowly and carefully. Thus it benefits 
from the consistency gained from be- 
ing the product of one mind. 

However, FORTH is not a 
‘frozen’ language, as most conven- 
tional languages are; it is extensible. 
When you are programming in FOR- 
TH, you are actually extending the 
language, making it have new proper- 
ties and capabilities. You can add 
your own data structures, or even ex- 


tend it with new types of program 
structure. This feature is unique to 
FORTH, and is not shared by any 
other programming language. 

FORTH is modular and complete- 
ly structured. Programming consists 
of combining pre-defined or user- 
defined modules (called ‘‘words’’) in- 
to increasingly powerful units. Final- 
ly you will have one word that is your 
whole program. Debugging is made 
simple; all modules may be tested in- 
dividually before combining then into 
higher levels. 

The implications of this are far- 
reaching. If you mainly are interested 
in business applications, you will 
soon have extended FORTH with 
words turning it into a business- 
oriented language. If your interests 
are in process control, the language 
will turn into a dedicated process con- 
trol language. In fact, you can have 
both at the same time. 

This means that you will create a 
library of words, suited to your par- 
ticular area of programming. They 
may then be used over and over 
again, since they are independent of 
their context. You may find, when 
writing an application, that it is 
already written to 80% by your 
previous applications. This will bring 
down the developement time 
dramatically; a tenfold increase in 
productivity is claimed by some. 

FORTH is also very fast and com- 
pact. It is implemented as threaded 
code, a very powerful language im- 
plementation technique used in, for 
example, many COBOL compilers. 
FORTH employs a variant called in- 
direct threaded code, to which it ows 
much of its flexibility and compact- 
ness. For example, a typical FORTH 
macroassembler, written in FORTH, 
usually occupies just over 1500 bytes. 
FORTH programs are generally 
shorter than machine code, due to the 
threaded code principle. As for speed, 
1000 empty loops take under one se- 
cond. Commodore BASIC - a fast one 
- does the same thing in thirteen 
seconds. FORTH is usually 30 to 70 
percent slower than pure machine 
code, compared to BASIC that is over 
1000 percent slower. 

If your application requires it, in a 
time-critical part for example, you 
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may re-code parts (or all) of your pro- 
gram in assembler code, using the 
FORTH resident macro assembler. It 
is structured, meaning it has IF- 
ELSE-THEN (sic), BEGIN-UNTIL, 
BEGIN-WHILE-REPEAT, and 
BEGIN-REPEAT instructions. 
With a FORTH assembler, it is not 
uncommon to have the code working 
the first time. Modules created by the 
assembler are treated in exactly the 
same way as all other FORTH words, 
standard or user-defined; not even the 
compiler is able to detect any dif- 
ference. 

FORTH can also work in any 
desired numeric base, without affec- 
ting computation speed. You may 
work in vinary, trinary, octal, 
decimal, unidecimal, hexadecimal, 
dodekadecimal, or in any other base 
of your choice. When printing or 
displaying values, you can format the 
value as you wish. In accounting, for 
example, you may wish to put paren- 
theses around a negative value: you 
simply extend FORTH with a new 
printing operator to do this; it is 
defined in half a line. 

All arithmetic in FORTH operates 
on a stack. If you own an HP 
calculator you will be familiar with 
this type of arithmetic. FORTH uses 
postfix notation of expressions, 
meaning that the operators follow 
their operands. For example, the ex- 
pression “(1 + 2) * 3” is written in 
postfix notation as “‘ 12 + 3 *’’. This 
has many advantages apart from mak- 
ing all parentheses unnecessary; in 
fact, it is the way you really think 
when evaluating an expression. After 
the “‘initial shock”? you will rapidly 
become proficient in postfix notation 
- you will realize, perhaps reluctantly, 
that it really is the only way to go. 
Traditional (infix) notation is not 
something ‘“‘natural’’; it is just 
something we happened to learn in 
school. 

Postfix has other advantages too. 
FORTH procedures do not need any 
parameter lists; they simply take their 
parameters from the stack. Any 
results is put on the stack, where later 
other procedures may pick them up. 
Natrually, this scheme of parameter 
passing elegantly allows recursion, a 
very useful programming technique. 
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Normally, FORTH operates on in- 
tegers. This is partly because 
history in automatization; integer 
arithmetic is very fast. FORTH has a 
multitude of single- and double- 
precision operators that partly 
eliminate the need for floating point 
arithmetic. In fact, complete Fourier 
transforms have been written in 
FORTH without floating point 
words. Floating point is however 
becoming available. Many FORTH 
vendors supply floating point 
packages as extensions, to be loaded 
when needed. If the computer has 
floating point software in ROM, 
FORTH can easily link to it. This is 
the method adopted in PET- 
FORTH, a full, extended FORTH 
supplied by my company, Datatronic 
AB. The floating point software, 
complete with trigonometric func- 
tions, does not occupy memory space 
when not desired, since you (or your 
programs) load it only when it is 
needed in your particular application. 


As for portability, FORTH systems 
are very much alike, and programs 
are usually portable from one com- 
puter to another with very little 
change. The FORTH Interest Group 
has published compatible source 
listings for almost’ every 
microprocessor available (1802, 8080, 
PACE 6502, 8086/8088, ALPHA 
MICRO, 6800, 9900, PDP-11, 6809, 
NOVA, and more to come) at a very 
low cost ($20). However, these ver- 
sions need customization before they 
can run on a computer. FORTH Inc, 
a company owned and operated by 
Charles Moore, have even more ver- 
sions available, and they can provide 
training on-site, when installating. 
They have put FORTH on - watch 
out - the IBM 1130, Burroughs 5500, 
Univac 1108, Honeywell 316, IBM 
360, NOVA, HP 2100, PDP-8, PDP- 
10, and PDP-11, Varian 620, Mod- 
Comp II, GA/SPC-16, CDC 6400, 
Computer Automation LSI-4, RCA 
1802, Interdata, Motorola 6800, 
6809, and 68000, Intel 8080 and 
8086, Mos Technology 6502, Four 
Phase, ILLIAC, and the TI 9900, 
just to mention a few. And they will 
not stop there, I think. Soon, the pro- 
duction of a special FORTH pro- 
cessor will start; it will have FORTH 
as its machine code language. 

FORTH does not need much 
memory, unlike many popular high- 
level languages like Pascal and FOR- 
TRAN. The famous ADA languages 


will not comfortably fit into even 64k! 
FORTH programs usually fit into 
16k of memory, and 32k is almost 
luxury. If your program is huge, you 
can use segmentation and/or virtual 
memory for your data areas and pro- 
gram modules. Memory is normally 
not a problem in FORTH. 


You’re probably wondering ‘“‘why 
this sudden activity around FORTH 
now, instead of ten years ago?” A 
few years ago, not even computer 
scientists knew of it. The few people 
who were using FORTH were (and 
are) very enthusiastic about the 
language and its capabilities. To 
make the FORTH language wider 
known, a handful of FORTH pro- 
grammers formed the FORTH In- 
terest Group (FIG) in 1978. Through 
their version of FORTH (fig- 
FORTH; now almost an industry 
standard), they have managed to do 
just that in a very short time. Another 
important event was that BYTE 
magazine devoted their entire August 
1980 issue to FORTH, thereby 
creating a floodwave of enquiries to 
FIG. FIG estimates to exceed 5000 
members in a year. 


Who is using FORTH, and for 
what? The first applications were in 
astronomy observatory automation, 
in fact, that was what FORTH Inc 
was founded to do. Quickly they 
realized, after having automated 
almost every observatory in the 
world, that you couldn’t support a 
company on that rather exclusive 
market. So they went into the ad- 
ministrative world. They have 
developed many powerful database 
systems, and are now entering a ma- 
jor expansion phase. 


Atari is using FORTH to replace 
machine code in arcade games. It is 
used in science fiction movies to do 
animation and control space ship 
models, for example in the movie 
‘Battle Beyond the Stars.” A 
FORTH-like language called SNAP 
is used inside the Hand Held Com- 
puter, developed by Friends Amis, 
U.S.A. FORTH controls satellites or- 
biting the Earth, prints invoices, 
calculates salaries, controls com- 
munication nets, sorts peaches, 
monitors laboratories, analyzes pic- 
tures, synthesizes music, and many 
other things. LISP and PASCAL in- 
terpreters have been written in FOR- 
TH. Datatronic AB has used it to 
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control residual gas analyzers, involv- 
ing a lot of fast graphics and computa- 
tions. We have also written a schedul- 
ing system, using n-dimensional vir- 
tual matrices. I’ve written an Adven- 
ture game in FORTH in my spare 
time. In fact (and this is not an 
overstatement), you can program any 
application in FORTH. 


By using a Target Compiler, you 
can get a compacted version of your 
program, suitable for burning into a 
PROM, with a typical overhead of 
500-800 bytes. Then, you can use this 
PROM without any other software to 
do whatever you wish. Target Com- 
pilers are usually hard to get, since 
they are intended for industrial use; 
but with some effort you can usually 
find one. 


How can you get FORTH for your 
computer? If you are good at machine 
code programming, and will enjoy 
typing 80 pages of assembler listings 
into your computer, you can get a 
listing from FIG (Forth Interest 
Group, P.O. Box 1105, San Carlos, 
CA 94070) for your particular 
microprocessor. It will take some 
time to customize, but the cost is after 
all only twenty dollars. 


You can also purchase a customized 
version from a vendor. If you own a 
PET 8032, you might want to contact 
us. PET-FORTH includes double- 
precision arithmetic, random 
numbers, IEEE handling, trig func- 
tions and a powerful string package 
with string searching capabilities. A 
textbook and reference manual of 322 
pages is included in the price ($390). 
Floating point routines are available 
as an extension. The program has a 
life-time guarantee. Versions will be 
available for the CBM 8096 and the 
MMF 9000. We do also sell a Target 
Compiler. 


Another of FIG’s goals is to raise 
user expectancy of the behaviour of 
higher-level languages, using 
FORTH as an example. FORTH is 
much more than a language; it can 
also be regarded as an operating 
system. Some have even questioned 
whether or not it is a language. So- 
meone proposed the name ‘“meta- 
language”. Charles Moore: ”’...Is 
FORTH an operating system? Is it a 
language? No programmer can af- 
ford to bypass it. 

Peter Bengsten 








Bulletin Board 


One of the fastest uses for microcomputers in the United States, is 
for exchanging information between computers over the phone. 

Micro owners now have access to many networking systems and 
databases, like the SOURCE and MICRONET where you will find a 
wealth of information ranging from stock prices to the latest news 


from this New York times. 


But the most popular is local networking systems called bulletin 
boards also known as electronic mail systems, permitting users to 
enter and retrieve messages or information. 


In the past 18 months bulletin 

boards have been set up all over the 
states, nearly every town or city have 
at least one, some large cities have 
several. 
Some bulletin boards specialise in 
subjects like education, medical, there 
is even one for other bulletin board 
numbers, and in San Francisco there 
is one for gays. 

Bulletin boards have now been 
operating in the U.K. for over a year 
and all operate electronic message 
system, programme library and infor- 
mation retrieveal, plus other items 
like Forum-80 (HULL) as TRS-80 
and PET user’s sections. 

To access a bulletin board system 
you need an RS232(if your computer 
hasn’t got one) and a modem plus 
software and any microcomputer can 
be used. 

Once you have set up your RS232 
(see list2) and loaded your pro- 
gramme, you are ready to call a 
bulletin board. 

Pick up the telephone and call one 
of the system numbers (see list no 1)’ 

When the other end answers, you 
should hear a tone on the line, now 
set your modem to originate (or place 
your handset in the cups if you are us- 
ing an acustic modem) and if all goes 
well a message will appear on your 
CRT, if not press carriage return a 
few times until the distant system 
responds. 


Example of signing on to a 
FORUM-80 Bulletin Board 


The FORUM-80 is designed to ac- 
cept a wide range of 300 baud con- 
figurations including 7 or 8 bit words. 
However, the standard configuration 
of 7 bits, no parity and 1 stop bit is 
best. When you sign on, a greeting 


will be displayed 

WELCOME TO THE FORUM-80 
OF (HULL, ENGLAND). 

the system will ask you the following 
questions to which you give ap- 
propriate answer: 

WHAT IS YOUR FIRST NAME? 
BOB 

WHAT IS YOUR LAST NAME? 
SMITH 

WHERE ARE YOU CALLING 
FROM? 

SWINEFLEET, YORKS. 

NAME: BOB SMITH 

FROM: SWINEFLEET, YORKS. 
IS THIS CORRECT, BOB? 


Checking users files. 


At any point, our _FORUM-80 
system is checking to see if you have 
signed on to this system recently. If 
you had signed on recently, a record 
of your terminal configuration would 
exist. This is one of the handiest 
features of FORUM-80. Suppose you 
are using an Apple II to talk to 
FORUM-80. Your control characters 
for various functions (clear screen, in- 
put prompt, etc.) are unique to the 
Apple. The same problem exists with 
many other microcomputers and 
dumb terminals. FORUM-80 solves 
this problem by allowing you to set 
up your own configuration table that 
the FORUM-80 uses every time you 
sign on. The user file is not perma- 
nent. You must call the system fairly 
regularly to keep your user file in 
system. Creating a user file for your 
terminal/micro is done by entering 
command ‘‘C”. If you have never 
called a particular FORUM-80 
system before, a “UNIVERSAL” 
configuration will be used. Then the 
system will give you the following in- 
formation: 


14 


Fred Brown 


YOU ARE THE CALLER %%%% 
LAST MESSAGE IN SYSTEM 
ON YOUR LAST CALL: %%%% 
VERSION 3.1 08/08/81 

At this point, the system will tell you 
if there are any messages in the 
system addressed to you (assuming 
correct spelling of your name was 
observed by the sender). To retrieve 
the message(s), simply enter an “FP” 
for Flagged Retrieval once you enter 
the command mode. The system 
automatically flags these messages for 
you. 

“* BULLETINS ** 

(HIT ‘S’ TO SKIP BULLETINS) 
(HIT fr’ TO PAUSE) 

The bulletins that the system 
operator has entered will appear next. 
If you want to skip them, press ‘‘S”’ 
key. You can use the “‘S”’ key in many 
other parts of the FORUM-80 system 
to stop output. If you are reading the 
bulletins and you want to pause the 
output for a moment, press the “‘P”’ 
key. Once the bulletin has been 
displayed or bypassed, you enter the 
command mode. The following will 
appear every time you enter the com- 
mand mode: 

00:45 COMMAND: 

The numbers just before the word 
“COMMAND” indicate how long 
you have been on the system (in this 
example, 45 seconds). If you press 
Carriage Return, ‘“‘Enter’” key or 
otherwise send an invalid input, the 
command table will automatically be 
displayed to you. If you are using a 
video-type terminal and have entered 
any invalid input, the command table 
will automatically be displayed to 
you. If you are using a video-type and 
have properly configured the system 
to your terminal (using the command 
**C’), the screen will clear after a com- 
mand is entered. 


Main commands 


00:47 COMMAND: (send a c/r will 
print a list of Subcmds) 


S = SUMMARIZE MESSAGES 

E = ENTER MESSAGES 

F = FLAGGED MSG 
RETRIEVAL 

O = OTHER SYSTEM 
NUMBERS 








H = HELP WITH SYS OPERA- 


TION 

C = CONFIGURATION 
CHANGES 

T = TERMINATE CONNEC- 
TION 


R = RETRIEVE MESSAGES 

K = KILL MESSAGES 

M =MESSAGES IN SYSTEM 

I = INFORMATION ABOUT 
SYSTEM 

U = USER LOG 

L = LOCAL FEATURES SEC- 
TION 

02:04 COMMAND: 

The above are the valid commands of 

FORUM-80 (3.1). Some FORUM-80 

systems may also have an “‘L” com- 

mand in this list. Entering a “L” 

command gives you access to special 

LOCAL features that may be sup- 

ported by a particular FOURM-80. 

Lets examine each command. 


Summarize messages 


Typing ‘‘S’’ and pressing 
“ENTER” or ‘SCARRIAGE 
RETURN” lets you enter the 
message summary mode. In this 


mode, you can look at a summary of 

the messages currently in the system. 

You can examine all the message 

headers, which contain information 

like who the message is to and from, 

the subject of the message and the 

category of the message (-M- 

Miscellaneous, -C- Commercial, -G- 

Graphics or Experimental, 

-P-Personal passworded). Here is the 

list of subcommands in the SUM- 

MERIZE MESSAGE mode: 

00:30 COMMAND: 

LOADING FILE - (S) SUMMARY 

03:40 (S) SUBCMD: 

C = COMPLETE (FULL) SUM- 
MARY 

Q = QUICK (ABBREVIATED) 
SUMMARY 

S = SEARCH SUMMARY FILE 

F = FLAGGED RETRIEVAL 

A = ABORT AND RETURN TO 
COMMAND MODE 

03:48 (S) SUBCMD: 


Enter a message 


Message entry is full of handy 
features that, to the unaware user, can 
cause some difficulty! These features 
are explained in Volume 2 of the 
Users Guide. Here we can only say 
“experiment at your own risk!’’. 
Below is an example of the standard 
method of entering a message into the 
system 09:10 COMMAND: ‘E’ 





LOADING FILE - (E) ENTER 

MESSAGES 

09:19 (E) SUBCMD: 

M =MISCELLANEOUS 
(GENERAL INTEREST) 

P = PERSONAL (PASSWORD 
PROTECTED) 

C = COMMERCIAL (FOR SALE, 
WANTED TO BUY, ETC.) 

G = GRAPHICS OR EX- 
PERIMENTAL 

A = ABORT AND RETURN TO 
THE COMMAND MODE 

09:27 (E) SUBCMD: 


These are the categories discussed in 
the summary search function. 
Passworded messages are accessible 
only to those who know the message 
password. Graphic or Experimental, 
Miscellaneous and Commercial 
messages are accessible by the user. 
Graphics and Experimental are 
described in further detail in 
Volume2 of the Users Guide. Choose 
the Commercial category only if you 
have something to buy-sell-trade etc. 

In summation, remember these two 
things about message entry: 

1. Leave BLOCK Entry alone 
unless you know what you 
are doing! 

2. SAVE before ABORT, or 
the system will “‘forget’’ the 
message you just entered! 


Other system numbers 


Entering the letter ‘““O” puts you 
into the directory of other system 
phone numbers. In this mode, you 
can selectively look at a list of system 
numbers for a particular city, area 
code, state, or system type (ABBS, 
CBBS, FORUM-80, etc) or all 
system numbers in the listing. The 
listing is as accurate as humanly 
possible and is updated regularly by 
the SYSTEM OPERATOR, 
however-we do not promise or 
guarantee that you will always get a 
computer at the other end! Here is an 
example of how the “O”? command 
works: 

13:05 COMMAND ‘QO’ 

LOADING FILE - (O) OTHER 

SYSTEMS PHONE NUMBERS 

13:19 (0) SUBCMD: 

F = FORUM-80 SYSTEMS 

O = OTHER SYSTEMS 

S = SEARCH FILE 

A = ABORT AND RETURN TO 
COMMAND MODE 
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Help with system operation 


Most of the contents of this part of 
the system are explained elsewhere in 
this users guide. However, there is 
One section that is not and describes 
one of the most POWERFUL 
features of the FORUM-80 system. It 
is the MULTIPLE COMMAND 
ENTRY feature. If you are calling 
long distance and you want to con- 
serve your system access time 
(resulting ina SMALLER phone bill) 
you should memorize the following 
explanation from the HELP file on 
MULTIPLE COMMAND EN- 
TRY: 

The system is equipped to receive 
multiple command in a single input. 

Multiple commands are accepted 
only in the COMMAND MODE in- 
put, subcmd prompts do not accept 
multiple command. The multiple 
command string may consist of from 
1 TO 20 sequenced commands as 
long as all commands operate within 
the same function. The multiple com- 
mand sequence is terminated when 
you re-enter the COMMAND 
MODE (or execute the last command 
of the sequence). 

The choice of the delimiter bet- 
ween commands is up to the user, any 
non-alphanumeric ASCII character 
may be used but the same delimiter 
must be used throughout the multiple 
command string. For example, if you 
are inputing a mult/cmd string which 
will not include a search string, then a 
space may be used as delimiter. 
However, if your mult/cmd string 
will include a search string with an 
embedded space, such as ‘JIM 
BROWN’ then another delimiter 
such as, or ; or : should be used. 


Configuration changes 


If you wish to take advantage of the 
full potential of the FORUM-80 
systems, you will want to set up a 
configuration table to match the 
FORUM’s control characters to your 
terminal. For example: the Apple II 
computer, when using the D.C. 
Hayes MICROMODEM, clears the 
screen every time the FORUM Sends 
a OE(HEX) character. On the TRS- 
80, this character turns on the cur- 
sor., In earlier versions of the 
FORUM.-80 software, every time the 
system looks for input from the user, 
it would send a QE character. An Ap- 
ple User would just barely get a 
chance to read the question asked by 
the system because the screen would 
go blank when the QE character was 





sent!! To eliminate this problem and 
other similar ones due to lack of con- 
trol character standards for terminals, 
the CONFIGURATION 
CHANGES function was designed. 
It allows you to set up a configuration 
table that the FORUM-80 software 
uses to process the control characters 
you wish to be sent by the system. 


Retrieve messages 


Entering an “‘R” in the command 
mode lets you enter the Message 
Retrieve mode. These are the SUBC- 
MDs available: 

21:20 (R) SUBCMD: 

F = FORWARD SEQUENTIAL 
RETRIEVAL : 

R = REVERSE SEQUENTIAL 

RETRIEVAL 

INDIVIDUAL MESSAGE 

RETRIEVAL 

P = PERSONAL MESSAGE 
RETRIEVAL 

S = SEARCH MESSAGE FILE 

G = GRAPHICS / EXPERIMEN- 
TAL RETRIEVAL 

A = ABORT AND RETURN TO 
COMMAND MODE 

Forward sequential retrieval example: 

FORWARD SEQUENTIAL 

(MSG 2677 to 3039) 

START AT MSG: 

The messages will be displayed star- 

ting at 2800 continuing to 2677 

or until you press the “‘S”’ key to stop. 

Reverse sequential retrieval example: 

REVERSE SEQUENTIAL 

RETRIEVAL 

(MSG 26 to 3039) 

START AT MSG: 

The messages will be displayed star- 

ting at 2800 and continuting to 2677 

or until you press the “‘S”’ key to stop. 

Individual retrieval example: 

INDIVIDUAL RETRIEVAL 

(MSGS 2677 to 3039 C/R TO END) 

MSG NO: 

Message 2765 will be displayed, 

assuming that a message is assigned 

to that number. As messages are 

purged from the system by users, 

message numbers are not reassigned 

to new messages or existing messages 

in order to avoid confusion in identi- 

fying a specific message with a 

specific message number. The system 

will ask you for another message 

number. If you are done, enter a 

cariage return to exit to the SUBC- 

MD function. Otherwise, enter 

another message number to view 

another message. 


I= 





Kill messages 


The kill function let’s you kill 
messages from the system as 
necessary. You MUST know the 
message password in order to kill the 
message! 

22:34 COMMAND: 
LOADING FILE - 
MESSAGE. 

22:43 (K) MSG NO: 
MSG: 2767 

DATE: 04/10 -22.34 
FROM: JIM CAMBERON 

TO: KILL TESTERS 

SUDJ: TEST KILL 

IS THIS THE CORRECT MSG 
(Y/N) ? 

ENTER PASSWORD: 

MESSAGE KILLED 


(K) KILL 


Information about system 

Entering a “I” will display infor- 
mation concerning the hours of 
Operation of the system, the equip- 
ment configuration used, and the ad- 
dress of the FORUM-80 Head- 
quarters. System hours of operation 
are controlled by the local system 
operator and will vary from system to 
system. 


User log 

Entering a ““U”’ will display a list of 
users who have called the system in 
reverse chronological order. The user 
log shows only the most recent call of 
a particular user. 


Terminate connection 


To terminate your connection with 
the FORUM-80, enter a “‘T’’. 
26:30 COMMAND: 
If the system is equipped with a com- 
ment file, the following will appear: 
WOULD YOU LIKE TO LEAVE 
CONFIDENTIAL 
COMMENTS TO THE SYSTEM 
OPERATOR? 
USE LINES SHORTER THAN 
80 CHARACTERS 
HIT CARRIAGE RETURN 
ALONE WHEN FINISHED. 

] 

2 
When you are finished with your 
comment and have hit a single car- 
riage return, the following will be 
displayed: 
THANKS FOR CALLING 
FORUM-80, BOB 
LAST MESSAGE:2800 
TIME ON SYSTEM: 28:14 
DATE: 08/08/81 
CONNECTION TERMINATED 
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That’s it! Study this guide carefully 
and you should get great satisfaction 
out of using bulletin systems. As 
mentioned throughout this guide, 
Volume 2 deals with the more 
sophisticated features of the FORUM 
software and will include notes on up- 
dates to the software that will affect 
user Operation. 

A system is only as good as it’s 
users, so feel free to leave messages on 
your local system on the headquarters 
system if you have any comments or 
questions about the bulletin board 
system. REMEMBER, the system is 
designed to operate with a wide varie- 
ty of terminal or microcomputer con- 
figurations. It is not written especial- 
ly for any particular system. If you 
have problems communicating with 
the FORUM-80, we want to know all 
the details of the problem. Leave 
comments explaining your difficulty 
on any FORUM-80 system or drop a 
line to FORUM-80 HEAD- 
QUARTERS, this will enable us to 
make the FORUM-80 a “UNIVER- 
SAL” hobbiest Electronic Message 
System. 


LISTING no 1. 
1)FORUM-80 HULL. 
H,Q) tel: 0482 859169 
The worlds first 
bulletin board. 
System operator 
BROWN. 
International electronic mail. Library 
for up/down loading software. 
Forum-80 users group, Pet users sec- 
tion, Shopping list. 

System hours, 7 days a week mid- 
night to 8.00 am 

Tues/Thurs 7.00 pm to 10.00 pm 
Sat/Sun 1.00 pm to 10.00 pm 


2)FORUM-80 LONDON tel: 01-286 
6207 

System operator LEON JAY 
Electronic mail, Library for 
downloading. 

System hours Tues/Fri/Sat/Sun 7.00 
pm to 11.00 pm 


3)FORUM-80 MILTON (TRS 80 
users group 80-NET) Tel: 0908 
566660 

System operators LEON HELLER 
& BRIAN PAIN. 

Electronic mail, Library, Newletter, 
TRS-80 information 

System hours 7 days a week 7.00 pm 
to 10.00 pm 


4)FORUM-80 HOLLAND Tel: 
010-313512 633 
System Operator 


(Forum-80 
international 


FREDERICK 


NICO 


GS, 





Communications Editorial 





Welcome to this, the third in our series of communications specials. 
When starting this central pullout feature, my only ‘aim’ was to have, 
every other month, a feature on education, and let the other months 
be taken up with whatever came along. However, owing to the ex- 
cellence of the articles contributed in August and October by Dr. 
Philip Barker (principal lecturer in the department of Computer 
Science at Teeside Polytechnic) I had no hesitation in devoting those 
month’s features to the role of the PET in differing aspects of com- 
munications : firstly ‘Using a Microcomputer as an Interactive Ter- 
minal’, and secondly ‘Algorithms for Intelligent Terminal Opera- 


tion’. 

After publishing those two it seem- 
ed only fitting to round off the year 
with a third article by Dr. Barker, and 
so here we have ‘Computer Networks 
and Program Distribution’. This 
month the article concerns itself with 
an introduction to computer net- 
works, and explains clearly and 
precisely just what computer net- 
working means. We then move onto 


the implications of distributed com- 
puting for users of personal com- 
puters, and an outline of some of the 
problems associated with software ex- 
change. Finally, he describes a 
technique for transmitting programs 
over the public switched telephone 
network. 

As in the two previous specials, we 
are concentrating in particular on the 


role of PETs in the world of com- 
munications. Although the majority 
of Dr. Barker’s article is aimed at 
microcomputers in general, the 
algorithms and routines that he 
describes are aimed at the PET itself: 
a 3032, to be precise. So the article 
becomes useful not only to 3032 
owners, but also to owners of other 
PETs as well. 

As you may be aware, 1982 is Infor- 
mation Technology year, so you can 
guarantee that there’ll be more ar- 
ticles coming up. If you’ve developed 
anything in this field, write and let 
me know. All contributions should be 
sent to the usual address at the front 
of the magazine. 

Well, I’ve said enough, and its time 
for Dr. Barker to take over. Let’s start 
communicating! 





Computer Networks and Program Distribution 





Philip G Barker, Department of Computer Science, Teeside Polytechnic, County Cleveland. 


Introduction 


One of the most interesting and useful areas of mathematics is that which deals with graph theory and its 
applications to science and engineering. In computer technology graphs are used for a variety of different 
purposes. Some of the more well known uses include: the formulation of flow charts and data structure 
diagrams in programming; the representation of electronic circuit diagrams; and, as a notational tool for 
use in the design of data bases and distributed computing systems. Of the graph structures that are com- 
monly encountered one particular type, the network, is of significant importance. It is used widely in soft- 
ware engineering and in many areas of computer design. Essentially, a network consists of a collection of 
‘point locations’ called nodes (or vertices) that are inter-connected by a series of directed arcs or edges. 


When designing or building com- 
puter systems graphs are often 
employed in order to model the en- 


tities under consideration. Nodes of 


the graph structure are used to denote 
the various components from which 
the system is (to be) constructed 
-these could be resistors, chips, tape 
decks or complete computer installa- 
tions. The directed arcs of the graph 
then represent the inter-connections 
between the building blocks of the 
system. In reality these might be cop- 
per tracks on a printed circuit board, 
strands of wire on a patch board, op- 
fical fibres, telephone lines, 
microwave beams or lasers. 


Computer systems technology em- 
braces a wide variety of components: 


micros, minis, mainframes and super- 
computers (IEE80). The latter are 
based upon the highly parallel inter- 
connection of many processing 
elements to produce multiple CPU 
configuration and array processors. 
The latest trend in this domain is 
towards the use of ultracomputers 
(Sch 80). These require a means of 
putting together computing 
assemblages consisting of thousands 
of inter-linked elements. The prac- 
tical realisation of such an arrange- 
ment depends upon the use of VLSI 
technology. The motivation for con- 
necting computing elements together 
lies in the fact that with such 
machines it is possible to achieve 
faster computational speeds (through 
parallelism), greater reliability 
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(through redundancy) and more flex- 
bility as a result of dynamic sub-task 
allocation. Computers linked together 
in this way are usually located within 
fairly close proximity - often within 
the same room. The term multi- 
processing is often used in order to 
describe this type of inter-connection. 


There are many other reasons for 
wanting to link up computer systems 
- particularly, in situations where the 
distances between the elements to be 
linked is geographically large 
-perhaps, thousands of miles. The 
term computer networking is used to 
describe this approach to digital 
systems inter-connection. Figure 1 
shows the technology of a typical net- 
work configuration. 


figure 1. 


TOPOLOGY OF A SIMPLE COMPUTER NETWORK 





Computer Networks - an 
Overview 


In this diagram individual com- 
puters in the network are represented 
by the nodes of the graph. The con- 
necting lines (arcs) now represent 
data transmission links that enable 
data and information to flow between 
the various nodes. The term com- 
munication sub-network is often used 
to refer to the underlying data 
transmission arrangements that sup- 
port the integrated computer system. 
The geographical distribution of the 
nodes in the network will usually not 
influence its operation or the func- 
tions it is designed to perform. Thus, 
in figure 1, computer A might be 
located in London, B in Paris, C in 
New York and D in Oslo. Sometimes 
there will be more than one direct 
link between given nodes (as in the 
case of A and D) in order to provide 
greater overall system reliability. 

Closely dependent on the idea of 
computer networks and a concept of 
growing importance is that of 
distributed computing. Here the com- 
putational tasks to be performed in 
solving a problem are serviced by the 
resources of the computer network as 
a whole rather than those associated 
with any particular individual node. 
Suppose, for example, that the simple 
network described above was to be us- 
ed for some scientific experiment. It 
is feasible that laboratory data col- 
lected by a data acquisition system at- 
tached to computer D could be 
transmitted to computer A for pro- 
cessing; then, following this, the 
results could be sent to computers B 
and C for storage. Retrieval requests 
for inspection of particular items of 
data might then arise from users of 
any of the four computers, A, B, C or 
D. Distributed processing of this type 
can offer many advantages such as: 
high availability and greater reliabili- 


ty; improved work throughput and 
response time; distributed data pro- 
cessing, storage and retrieval; load 
levelling and resource sharing; 
greater security, integrity and privacy 
of data; and, system modularity and 
the implications that this offers form 
highly structured approach to im- 
plementation. 


Essentially, a distributed process- 
ing system may be thought of as an 
inter-connection of geographically 
distributed digital sub-systems. Each 
has certain processing capabilities and 
communicates with other sub-systems 
through the exchange of messages of 
various sorts - a more rigorous list of 
criteria has been given by Enslow 
(Ens78). Within such a distributed 
system each host node may have its 
own local operating system and ap- 
plications software. This may be uni- 
que to a particular node. The various 
hosts will communicate with each 
Other using common message 
transmission protocols. Two com- 
monly used techniques for transmis- 
sion of information around a network 
are message switching and packet 
switching, these will be described in 
more detail later. One important 
feature of the network is that the 
route information takes from an 
originating node to its destination 
node will not be guranteed since this 
will be influenced by the state of the 
network at any time. To the user the 
system will present a common com- 
mand language via the network 
Operating system. This will usually 
provide a set of high level commands 
that enable the user to control the ser- 
vices and facilities that the network 
offers - for example, CREATE, 
SEND, FETCH, FIND to control 
the manipulation of files of stored; 
DATABASE XYZ, to establish con- 
nection with a particular data base 
system, and so on. 

Since their inception, computer 
networks have grown from simple in- 
house affairs to systems that span 
both national and international boun- 
daries. They have expanded across 
continents in order to interconnect 
major computing faciities around the 
world. Nowadays, with the advent of 
inexpensive micros and minicom- 
puters (and equipment based upon 
them), computer connections are ex- 
tending between buildings and along 
corridors to enable the linking 
together (via Local Area Networks or 
LANs) of officies and laoratories on a 
world-wide scale. Progress in this 
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area is very rapid - particularly since 
the development of satellite links. 


Types of network and their 
purpose 


Computer networks may be 
classified by any of a wide range of 
possible attributes: by their topology 
(star, tree, loop, etc); by the control 
discipline used (central or 
distributed); by the type of informa- 
tion that the network carries: the 
mechanisms for transmitting it 
(message or packet switching); by the 
communication links involved (cable, 
twisted pair, radio, etc); and, the 
nature of the computers involved - 
these may be of the same type or may 
difier’ quite significantly 
(homogenous and hetergeneous net- 
works, respectively). These attributes 
represent just a few of those that are 
widely used to describe and classify 
the different types of computer net- 
works that currently exist. In this sec- 
tion some of these attributes will be 
briefly explained. 


Network Topology 


The term topology refers to the 
geometrical arrangement of links and 
nodes of a network. Within these 
nodes it is possible to locate several 
different types of hardware and soft- 
ware depending upon the function 
that an individual node is to perform. 
When designing a network, many dif- 
ferent factors must be evaluated in 
order to choose the most suitable 
topology. One major factor that is 
likely to strongly influence this choice 
is the type of participation required 
by each of the nodes. Thus, it is 
possible for a node to act 


1) exclusively as a consumer of 
resources, 
2) exclusively as a provider or 
resources, Or, 
3) as both a consumer and pro- 
vider of network resources. 
Depending upon the likely resource 
utilisation and the way in which 
nodes need to communicate with each 
other, about half a dozen “‘standard”’ 
types of network topology are com- 
monly used. These are summarised in 
the seven diagrams (A through G) 
contained in figure 2. 

The simplest type of configuration 
is the point-to-point agreement shown 
in diagram A. Here two nodes are 
joined by a single communication 
link. This may be a private wire or a 
switched line - as in the public dial-up 





FIGURE 2 BASIC NETWORK STRUCTURES 
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telephone network. A more complex 
arrangement of nodes is illustrated in 
the multi-point system depicted in 
diagram B. This requires that several 
nodes share the same communication 
link. One of the nodes in the network 
is designated as the controller and the 
others then become tributory sta- 
tions. The controller manages net- 
work traffic by means of polling, that 
is, it invites other stations to send 
messages in turn. Multi-point net- 
works are usually established over 
non-switched leased lines. 

Diagram C shows another popular 
network arrangement called a cen- 
tralised star system. In this configura- 
tion all users communicate with a 
central point that has supervisory 
control over the system. Peripheral 
nodes can only communicate with 
each other via the central controller. 
This thus provides a central message 
switching service for the other nodes. 

A typical hierarchical structure is 
shown in sketch D. Such an arrange- 
ment is often employed in industrial 
environments to supervise a variety of 
real-time process monitoring applica- 








tions. A hierarchy of computers is us- 
ed to control various processes, syn- 
chronise them and report on their 
status. Both microcomputers and 
minicomputers are used as nodes in 
this type of arrangement. These oc- 
cupy the lower levels of the tree struc- 
ture with, perhaps, a mainframe or 
large minicomputer at the top. 
Many organisations design their 
computer networks in the form of a 
loop or ring structure (diagram E). In 
an arrangement of this type there is a 
common communication loop to 
which all nodes are attached. The 
data to be transmitted is then looped 
around the nodes in turn. A loop or 
ring arrangement of this type is very 
economical when several remote sta- 
tions and host processors are located 
near to each other - perhaps within 
the same building or distributed over 
a manufacturing plant. However, 
when the stations are geographically 
dispersed over long distances the line 
costs would probably be too expen- 
sive for a loop structure and a cheaper 
form of distributed network would 
probably be required. Two of these 
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are described below. 

The multi-star network similar to 
that shown in diagram F is an often 
used configuration in which there are 
several supervisory or exchange 
points each with their local cluster of 
attached nodes. The local hosts usual- 
ly service the requirements of their at- 
tached nodes but also permit general 
communication between any of the 
other points in the network. If pro- 
perly designed, distributed networks 
can offer significant reliability advan- 
tages, since a failure at one node does 
not affect the rest of the configura- 
tion. Indeed, in applications where 
the reliability of continuous com- 
munication is important, a fully 
distributed network (diagram G) in 
which every point is connected to 
several neighbouring points may be 
preferred. The additional transmis- 
sion paths provided by this type of 
structure improves the overall perfor- 
mance of the system quite substantial- 
ly. When using this type of topology, 
detailed traffic analysis must usually 
be performed in order to determine 
where the links are required. 

The network structures described 
above and illustrated in figure 2 
represent the most common types of 
discrete network architecture. It is 
feasible, however, to use these as 
basic building blocks to construct 
even more complex arrangements. 
Thus, two, three, or more, networks 
having topologies similar to that 
shown in diagram G may be inter- 
connected to form a _ highly 
distributed arrangement of nodes. 
Logically, the arrangement will ap- 
pear as three separate networks linked 
at particular points. Because the in- 
dividual networks will require to re- 
tain various attributes of autonomy, 
and, because they will differ con- 
siderably from each other in their 
characteristics, special modes of inter- 
connection are required. Nodes that 
are used to interlink networks of dif- 
ferent types in this way are called 
gateway nodes. Their design has been 
described by a number of authors 
(Hig 75, Wal 75). A description of 
one such gateway that connects the 
University of Rochester to the APRA 
network in the USA _ has_ been 
presented by Ball et al (Bal76). 


Circuit, Message and Packet 
Switching Networks 


There are three basic methods for 
routing communications traffic from 
a source to a destination within a 




















computer network: circuit switching, 
message switching and packet swit- 
ching. In a circuit switching network 
- similar to the public switched 
telephone system - the role of the 
switching centre(s) is to establish a 
direct connection between nodes in 
the network. Once established these 
may then carry on one-way or two- 
way communication with minimal 
delay between the transmission of a 
message and its arrival at its destina- 
tion. When communication is com- 
plete, the switching centres discon- 
nect the circuit and restore the system 
in readiness for other connections. 
Circuit switching often requires long 
connect times and ties up transmis- 
sion capacity for long periods. This 
arises because of a fundamental pro- 
perty of circuit switching - once a 
path is determined through the net- 
work nodes, all traffic between a 
source and destination pair then 
follows the same path. 


An alternative mode of transmis- 
sion which does not require a fixed 
route between  source/destination 
could have many advantages. Using 
such an approach, two possibilities 
exist - depending upon the volume of 
data to be transmitted: message swit- 
ching and packet switching. In 
message switching, each item of data 
is sent into the network as a discrete 
unit and is then routed to its destina- 
_tion. The format of the unit that is 
_ transmitted is illustrated in diagram 
A of figure 3. 


A message makes its way through 
the network to the destination whose 
address is specified in the header. 
Each node in the network uses an ap- 
propriate routine algorithm in of 
order to decide which node the 
message has to got to next in order to 
reach its destination. Since some sta- 
tions may be busy, a message may 
often have to be stored at in- 
termediate nodes before it is passed 
on. For this reason an arrangement 
such as its often called a ‘store and 
forward’ system. 


Packet switching is essentially 
similar to message switching and is 
used when large volumes of informa- 
tion are to be transmitted. At the 
source station a large message is sub- 
divided into a series of fixed length 
segments (called packets) of size 1,000 
-8,000 bits. Each packet has a unique 
number associated with it to enable 
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the reconstruction of the complete 
message at the destination. The for- 
mat of a packet is similar to that of a 
message and is shown in figure 3 
(diagram B). 


Packets are treated individually and 
are forwarded along the best available 
route, that is, the route with the 
shortest transmission delay. Each 
packet is checked for errors at each 
node along the way by means of the 
error checking field contained in the 
packet. Because long messages are 
broken up and sent over different 
routes it is possible for them to arrive 
at their destination more quickly. 
Furthermore, since intermediate 
nodes in a packet switched network 


A 





only have access to segments of the 
whole they are unable to assemble 
the entire message. Thus, if data en- 
cryption is not being used, transmis- 
sion is more secure. 


Videotex Networks 


Videotex networks (Bal80) were 
orignally introduced to provide low 
cost public data and information 
retrieval networks based upon broad- 
cast TV signals or a_ switched 
telephone network. Intended primari- 
ly for use as public information 
utilities the systems were designed 
around the use of a single tree struc- 
tured data base. Modified T’V sets are 
used as user terminals through which 
could be implemented a variety of 





menu selection techniques in order to 
facilitate data/information retrieval 
operations. Figure 4 shows the way in 
which the components of a typical 
videotex network might be intercon- 
nected. 

There are two types of terminal: 
IPT - the Information Provider’s Ter- 
minal and UT - the User’s Terminal. 
The information provider is the per- 
son responsible for entering data into 
the data base and ensuring its correct- 
ness. The arrangement of com- 
ponents is essentially a star network 
with the computer at the centre and 
the terminals and videotex data base 
(M) attached as peripheral nodes. 
This type of equipment is often used 
for the provision of in-house informa- 
tion systems - for a laboratory, opera- 
tions room or sales office. In additon 
to their prime use as information 
retrieval tools, the two-way com- 
munication capability of many of 
these systems enables the implemen- 
tation of a wide variety of ‘electronic 
mail’ and ‘electronic journal’ 
facilities. On a larger scale such 
systems are used to provide global or 
national information utilities. Typical 
examples of systems, of this type in- 
clude PRESTEL (UK), 
BILDCHIRMTEXT (Germany), 
ANTIOPE (France), and TELIDON 
(Canada). These videotex networks 
are widely used for the provision of a 
variety of commerical, scientific and 
technical information to the general 
public. 


The Need for Standards 


One of the basic pre-requisites 
necessary for the construction of a 
viable computer network is the ability 
to easily connect various kinds of 
computing equipment to a com- 
munication sub-system. Unfortunate- 
ly, this is not always as easy in prac- 
tise as it is in theory. Most people 
have probably experienced the pro- 
blems encountered when an attempt 
is made to interface one electronic 
device (such as a computer) to 
another (say, a printer or laboratory 
instrument). The problems can be 
quite substantial unless some form of 
standard interface is used. For 
peripheral interfacing the IEEE-488 
or RS-232-C conventions are now 
commonly used. Analogous interfac- 
ing standards also exist to facilitate 
computer networking. 

When network components are 
inter-connected many problems can 
arise unless agreed upon conventions 


are used. Because of their much 
greater complexity, there will ob- 
viously be many more difficulties 
associated with the formulation of 
standards for networks compared 
with those necessary for simple 
computer-peripheral interfacing. 
Usually, two classes of standard are 
needed: one to deal with hardware 
related matters and another to cater 
for software factors. Hardware 
related standards specify how com- 
ponents are to be physically con- 
nected with each other. Here, typical 
considerations include electrical 
signal characteristics, signal speeds, 
signal types, electrical connector 
dimensions, etc). Software standards 
deal with the way in which informa- 
tion is transmitted around the net- 
work. Important factors in this 
category are line protocols, error 
checking algorithms, encryption 
methods and so on. Most of these are 
adequately documented in the 
technical literature. 

The numerous documents that are 
available cover a wide variety of data 
transmission and networking stan- 
dards. Most of these originate from 
manufacturers (product specific) or 
from international standards such as 
CCITT, EIA and ISO. Those 
originating from the latter are usually 
product independents. Much of the 
more important material relating to 
standards is covered in text books on 
telecommunications (Dav73, Can80). 
One of the more useful introductory 
hand-books is the “‘V-Series Report”’ 
(Boo81). This explains most of the 
important technical telecommunica- 
tions terminology in a readable and 
digestable fashion. It also contains 
details of the popular data transmis- 
sion standards and describes their 
relevance to networking. Anyone in- 
tending to use a data communication 
system would find this book a 
valuable asset. At a more advanced 
level another useful publication is the 
“Network Independent File Transfer 
Protocol” (HLP81). This specifies a 
file transfer scheme that permits the 
exchange of information files of any 
kind over any type of data com- 
munication network (public or 
private) regardless of the nature of the 
hardware that is used. This latter 
standard is thus orientated towards 
some of the software aspects of net- 
working. 

In the future it is likely that more 
and more organisations will become 
involved in computer networking 
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-perhaps, through public packet swit- 
ching systems such as the UK’s PSS. 
As this happens the continous evolu- 
tion of appropriate standards will be a 
necessary prerequisite if. acceptable 
user-orientated systems are to be pro- 
duced. As will be discussed in the 
next section, one the the largest 
potential growth areas for networking 
facilities is likely to be users of per- 
sonal computer systems. Activity in 
this domain will undoubtedly 
necessitate the formulation of yet 
more networking standards. 


The Implications of Computer 
Networks 


A few years ago, pocket calculators 
were very much the fashion. Most 
people seemed to own one 
-shopkeepers, business personnel, 
managers, house-wives, teachers and 
students. Unfortunately, despite their 
popularity and significant utility, for 
the average user calculators were 
never exceptionally exciting 
machines. After all, what could they 
do? Their repertoire was extremely 
narrow. They were only capable of 
performing numerical calculations in 
a way which was faster, more precise 
and (one trusts) less error prone than 
computations performed manually, 
via a Slide rule or using log tables. 

More recent developments in elec- 
tronics, computing and communica- 
tions technology now put us at the 
forefront of what is likely to be yet 
another significant era in the develop- 
ment of the human species - the 
widespread availability of the per- 
sonal computer. Unlike the pocket 
calculator, this new device is far more 
interesting since it has a potential to 
act as: 


1) a powerful numerical 
calculator, 

2) a processor for many dif- 
ferent kinds of textual, sonic 
and graphic information, 

3) a large capacity storage ar- 
chive for a wide variety of 
personal data and informa- 
tion, 

4) a sophisticated learning 
medium, and, 

5) a channel for interpersonal 
communication. 


As society moves towards an age of 
‘personal computing’ and to enable 
each of the above objectives to be 
realised, there is a going need to 
facilitate the easy exchange of pro- 





grams and data between one person 
and another. Ideally, this will be 
achieved by means of some form of 
commonly available global com- 
munication network. The more im- 
portant approaches to networking 
have been described in the previous 
section. Many of these techniques are 
now being explored. Some of the 
more important developments within 
the UK are: 


a) dissemination via broadcast 
teletext facilities, (for exam- 
ple, ORACLE and 
CEEFAX), 

b) distribution via viewdata 
systems, (for example, 
PRESTEL), and, 

c) use of a distributed computer 
network, (for example, 
NUNET, POLYNET). 

Each of these approaches has its ad- 
vantages and disadvantages. 
ORACLE and CEEFAX obviously 
only allow one way transmission of 





information from a central depository 
to a consumer population. Both the 
BBC and ITV are currently in- 
vestigating this type of ‘telesoftware’ 
distribution (Hay81). The PRESTEL 
approach partially removes the 
unidirectional limitations of 
CEEFAX and ORACLE. This is 
possible because some degree of ‘two- 
way’ exchange of information is per- 
mitted. In this type of system, there 
are two categories of user - the or- 
dinary customer (who just retrieves 
and examines pages of stored 
material) and the information pro- 
vider. The major drawback of this 
system is that not all users can be in- 
formation providers. The Council for 
Educational Technology is currently 
investigating this mode of informa- 
tion dissemination in conjunction 
with a number of schools and colleges 
(CET 81). 

The third approach to program and 
data destribution is via a truly 
distributed computing network 


FIGURE 5 PROGRAM EXCHANGE BETWEEN PERSONAL COMPUTERS 


Direct Transfer 


MICRO ae ae MICRO 
x Y 


Transfer via an Intermediate Mainframe 


MAINFRAME 
Vv 


[ws Jas 


Zz 





zi 


ae 
SE] 


(Can80, Dav73). Such a system has 
the advantage of enabling totally 
unrestricted bi-directional inter- 
change of data between any two 
users. In the remaining part of this ar- 
ticle the use of the public switched 
network (PSN) as a means of 
distributing programs and data bet- 
ween users of personal computers 
will be described. 


Tranmission of Source Pro- 
grams between Microcom- 
puters 


The architecture of the distributed 
computing system will significantly 
influence the types of data transfer 
that it will support. However, two 
broad types are generally feasible - 
depending upon whether or not there 
is any intermediate storage of 
material. These are illustrated 
schematically in figure 5. 

In case A, the micro owner at site X 
is able to dial the telephone number 
of the micro at site Y and then 
transmit information to it. In the con- 
text of data exchange, transmission 
takes place as if the two micros were 
directly linked together (Cam81). 
However, because messages passing 
over the communication network are 
likely to be influenced by noise, 
suitable error detection and correc- 
tion procedures need to be added to 
the software in the micros. This mode 
of data exchange does not utilise any 
intermediate storage of the informa- 
tion being transmitted. Consequent- 
ly, if either micro fails to respond to a 
call from its incipient partner, no 
transfer can take place. 

An alternative method, shown in 
diagram 5B, illustrates a situation in 
which a micro at location X can ar- 
chive material in a mainframe at site 
V or W. At some later stage the 
stored material can be retrieved by 
micro owners at sites X, Y or Z - pro- 
vided, in the case of the latter two, 
they can meet the necessary access 
control requirements. Through this 
kind of technique the sharing of infor- 
mation is a trivial problem. What is 
more important, however, is that it 
now becomes a simple matter to 
physically distribute the information 
to many different geographical loca- 
tions. Details of using a microcom- 
puter as an interactive terminal device 
over the public switched telephone 
network have been described 
elsewhere (Bar 81a, Bar 81b), Similar- 
ly, the use of a microcomputer as an 





intelligent terminal has also been 
outlined (Bar81c). In this latter work 
algorithms to enable the transfer of 
files of information between a main- 
frame and a microcomputer were 
described in some detail. Implemen- 
tations of these algorithms have also 
been presented. Essentially, the pro- 
grams that have been constructed 
allow complete mobility of files bet- 
ween micro and mainframe systems. 
These files may contain machine code 
programs, high level (source code) 
programs or data. Using this software 
the movement of programs between 
one micro and another (via a main- 
frame) is a reasonably straightforward 
task. However, a decision must be 
made regarding whether these should 
be ‘shipped’ around in machine code 
or source level format. 

Historically, program portability 
has always been significantly in- 
fluenced by four important factors, 


a) the use of high level 
languages, 

b) the availability of interna- 
tionally accepted language 
standards, 

c) the extent to which pro- 
grammers remain within the 
limitations imposed by (b), 
and, 

d) the arthitectural-differences 
between the computers on 
which the programs run. 


These factors alone are probably suf- 
ficient to justify any decision to 
transmit program files in source code 
format rather than as machine code 
memory images. In this context we 
have been examining the problems 
associated with transmitting both 
PASCAL and BASIC programs over 
the PSN between micros and main- 
frames. Some interesting results have 
been observed - one of which is 
described in the next section of this 
article. 


The files that are transmitted bet- 
ween the two computers are organis- 
ed in the form of a contiguous set of 
characters. Certain special ones (for 
example, end of line-$OD) interspers- 
ed in the sequence serve to impose a 
simple record structure on these files. 
Although they might not be physical- 
ly stored in this way on either the 
source or destination computers, this 
simplistic view of their structure is 
sufficient to enable the ensuing 
discussion to be followed. 


Loading BASIC Programs 
from Secondary Storage 


Once a BASIC program has been 
transmitted from a remote computer 
and stored locally on a secondary 
storage device (either tape or disk) it 
is a simple matter to load this into 
memory for subsequent execution. 
The exact mechanism for loading a 
program will obviously depend upon 
the type of microcomputer that is us- 
ed. For the purpose of illustration, in 
the example that is described below a 
Commodore PET (3000 series) has 
been employed. 

The function of a ‘loader’ program 
is quite simple. It has to read BASIC 
statements contained in a secondary 
storage file, convert these to the ap- 
propriate internal format and store 
them at the correct location within 
PET’s memory space. The functional 
requirements of such a program are 
summarised in diagram A of figure 6. 
As can be seen from this simple il- 
lustration, the storage area for BASIC 
programs commences at $0400 and 
extends upwards to $7FFF (for a 32K 
machine). However, because the 
loader program itself occupies a sec- 
tion of memory just below the upper 
limit, there will be an inherent restric- 
tion on the size of the programs that it 
can handle. 

One of the major tasks that the 
loader has to perform is the conver- 
sion of program code from its exter- 
nal format into its internal representa- 
tion in ‘tokenised’ form. When 
represented in this way each of the 
keywords and special operators in the 
language is internally stored as a 
single 8-bit numeric value. A com- 
parison of the external and internal 
forms of a small BASIC program is 
shown in diagram B of figure 6 shown 
Overpage. In internal format, each 
statement consists of a two byte 
pointer, a two byte encoding of the 
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statement number, a sequence of 
bytes representing the tokenied ver- 
sion of the original souce line and 
finally, a byte containing an end-of- 
line marker. 
In figure 6B underlining is used to in- 
dicate the position of the statement 
numbers in the internal representa- 
tion of the program. The structure of 
BASIC statements and programs are 
discusse in more detail in most of the 
standard PET handbooks (Don81). 
Once a statement has been tokenised, 
it has to be inserted into its correct 
position in memory. Both tokenisa- 
tion and insertion are usually achiev- 
ed by means of special routines built 
into the PET operating system 
(residing at ROM locations $C34B 
through $C43F). There is no in- 
herent reason why this code cannot 
be employed by user programs. 
However, in order to utilise it in the 
desired way a slight modification to 
the ROM code would be necessary. 
Because it is not possible to alter this, 
the relevant section of the PET’s 
Operating system must be copied 
across to RAM and used from there. 
This is easily achieved by means of a 
simple assembly language program 
that is written in such a way that 
when it is assembled a gap is left in 
the normally contiguous sequences of 
address allocated to it. Later, when 
the program is executed, this gap can 
be filled by the appropriate copied 
code. 

The basic algorithm upon which 
the implementation of the loader 
depends is shown in figure a. 

As was mentioned earlier, step 7 will 
be performed by ‘borrowed code’ 
while the remaining steps will be im- 
plemented via user written statements 
(see figure 6C). A listing of an 
assembly language program that im- 
plements the above algorithm - for 
BASIC source files residing on 
casette tape - is shown in figure 7. Ac- 
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Initialise 


PET sASTC 


system - (Cperform a NEW). 


Read input file CGet next source character). 
If end-of-line detected then go to step é. 
If end-of-file detected then go to step §&. 


Store source character in 


Go to step 2. 


BASIC buffer area. 


Prerare for entry into the operating system 
reutinese 
Tokenise the source statement held in the 
buffer area. 
Enter tokenised statement into 
Go to step 2. 
Pass control back to 


WREADY" message. 
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PRINCIPLE OF OPERATION 


BASIC Program in, 
source code format 





COMPARISON OF _ INTERNAL AND EXTERNAL FORMS OF A_ BASIC PROGRAM 


SOURCE CODE 


10 PRINT"HELLO” 
20 X=3+2 

30 Y=3*2 

40 PRINT X,Y 

50 PRINT"GOODBYE" 





FUNCTION OF A SOURCE CODE LOADER 


PET Memory Space 






Reserved Area 





INTERNAL FORMAT 


00 OE 04 0A 00 99 22 48 
45 4C 4c 4F 22 00 18 04 
14 00 58 B2 33 AA 32 00 
22 04 1E 00 59 B2 33 AC 


32 00 2C 04 28 00 99 20 
58 2C 59 00 38 04 32 00 
99 22 47 4F 4F 44 42 59 
45 22 00 00 00 AA AA AA 





MEMORY MAP _ FOR A_ TYPICAL LOADER 
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“TAPE LOADER PROGRAM 
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TAPERD=$F855 
DEVICE=$D4 
BASBUF=$0200 
BUFFER=$027A 
NEWSYS=$C55D 
CHRGET=$0070 
OSCODE=$C3AB 
BASIC=$C389 
*=$7E00 
START  LDY #$0 


COPY LDA OSCODE,Y 
STA INSERT,.Y 


;TAPE READ ROUTINE 

;INPUT DEVICE NUMBER 

;BASIC BUFFER 

;1APE BUFFER 

;PERFORM "NEW" 

sLINE FETCH ROUTINE 

sSTART OF CODE TO BE COPIED 
;BACK TO BASIC 


;COPY OS CODE 
;INTO THIS PROGRAM 


INY 

CPY NUM 3ALL DONE? 

BNE COPY 3NO - GET SOME MORE 
STEPT JSR NEWSYS ;INITIALISE SYSTEM 

JSR TPREAD ;READ A TAPE BLOCK 

JSR TPREAD sREAD A TAPE BLOCK 

LDX #$0 sINITIALISE X-REGISTER 

LDY #$1 sINITIALISE Y-REGISTER 


STEP2. LDA BUFFER,Y 


sGET A CHARACTER FROM TAPE BUFFER 


CMP #$0D -IS IT END OF LINE? 
STEP3 BEQ STEP6 sYES 

CMP #$00 -IS IT END OF FILE? 
STEP4 BNE STEPS “NO 

JMP STEPS “YES 


STEPS STA BASBUF ,X 


;STORE IN BASIC BUFFER 


INX ; INCREMENT X-REGISTER 
LY INY ;INCREMENT Y-REGISTER 

CPY #$CO sEND OF DATA BLOCK? 

BEQ GBLOCK sYES - GO GET ANOTHER 

JMP STEP2 3NO - GO GET NEXT CHARACTER 
GBLOCK JSR TPREAD sGET ANOTHER BLOCK 

LDY #$1 ;INITIALISE COUNT 

JMP STEP2 sRETURN TO MAIN LOOP 


STEP6 LDA #$00 


STA BASBUF ,X 


sPUT EOL INTO BASIC 
;BUFFER AREA 


LDX #$FF- ;SET UP POINTERS TO THE 

STX $77 ;ADDRESS OF BASIC 

LDX #$01 ;SOQURCE TO BE PROCESSED 

STX $78 

STY YIND sSAVE CONTENTS OF Y-REGISTER 


STEP7 JSR CHRGET 
INSERT=* 


sINVOKE CHRGET ROUTINE 
;TOKENISE STATEMENT 


*=*+ $94 ;AND INSERT RESULT INTO 

;BASIC PROGRAM AREA 
;GET READY TO GO BACK AND 
;PROCESS NEXT STATEMENT 

LDY YIND sRESTORE Y-REGISTER 

LDX #$0 ;INITIALISE X-REGISTER 

JMP LY ;GO BACK TO MAIN LOOP 

STEP8 NOP sEND OF FILE 
JMP BASIC sRETURN TO BASIC 


TPREAD LDY #$1 


“ROUTINE TO READ A TAPE BLOCK 
“LOAD INPUT DEV 


STY DEVICE “PASS TO OPSYS 

STX XIND “SAVE X-REGISTER 

JSR TAPERD “READ A TAPE BLOCK 

EDX XIND “RESTORE X-REGISTER 

RTS “RETURN TO CALLER 

“DATA STORAGE AREAS 

NUM [BYTE $94 “NUMBER OF BYTES TO COPY 
XIND .BYTE 0 -PLACE FOR X-REGISTER 
YIND .BYTE 0 -PLACE FOR Y-REGISTER 

"END 


companying this, in figure 8, is a 
complementary data flow diagram. 
When invoked the initialisation 
code copies $94 bytes (starting from 
$C34B) down to the vacant slot 
previously reserved for it by suitable 
manipulation of the assembler loca- 
tion counter. As soon as this has been 
completed the loading operation 
starts. The program depends upon a 
subroutine called TPREAD to 
transfer a block of data from cassette 
into its associated buffer area. In turn, 
this routine calls the operating system 
utility code commencing at $F855. 
Characters are then copied one at a 
time from the tape buffer ($027A) 
across to the BASIC input buffer 
($0200 - $0250) using the Y- and 
X-registers, respectively, as pointers 
in indexed load and store operations. 
Each time an end-of-line character 
($OD) is encountered in the input 
stream (INCHAR) an _ end-of- 
statement marker ($OO) is sent to the 
output stream (OUTCHAR) for 
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placement in the BASIC buffer. 
Subsequently, at step 6, the pointers at 
$77 and $78 are set up so that they 
point to the memory area containing 
the new statement. A subroutine call 
to the operating system utility 
CHRGET routine has been printed 
essentially a line fetch routine that 
sets up the next basic statement for 
processing. Its detailed mode of 
Operation is described elsewhere 
(Ham80, Doy80a, Doy80b). Once the 
CHRGET routine hasy been primed 
the code for tokenising/inserting the 
new line into the BASIC program 
area can commence execution. Fur- 
ther source statements are then pro- 
cessed one at a time until an end-of- 
file code ($OO for tape files) detected 
on INCHAR terminates the loading 
process and passes control back to 
BASIC direct command mode with 
the prompt “READY’”’. 

A major disadvantage of the loader 
shown in figure 7 is its lack of identity 
checking. Inherent in the program is 
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the assumption that the tape will be 
positioned at the point from which 
loading is to commence; the first 
(program identity) block is then skip- 
ped over. If it was necessary it would 
be a simple matter to replace the first 
reference to TPREAD (line 21) by a 
call to a subroutine that provides a 
better user interface. This could be 
designed in such a way that it inter- 
rogates the user in order to ascertain 
the name of the file to be loaded and 
then, automatically, positions the 
tape ready for loading. A routine of 
this type is, of course, a necessity for 
the version of the loader used to han- 
dle source programs that are resident 
on disk (Bar81d). 


It is interesting to compare the load 
times of BASIC programs in their dif- 
ferent formats. In order to do this a 
19 Kbyte program was transmitted 
over the PSN and stored on cassette 
tape. This was then loaded into 
memory using the tape loader and its 
load time was recorded. The loaded 
program was then SAVEd (in 
memory image format) onto cassette 
tape and reloaded using a LOAD 
command. As might be expected the 
latter process is much faster (by factor 
of about 2.9) than source code 
loading. However, in view of the fact 
that programs in source form are 
more easily exhanged than their 
equivalent machine code versions, the 
overhead is an acceptable one. 


Analogous programs exist to enable 
the loading of source programs from 
flexible disk (DKREAD in figure 8). 
These embody the same princliples as 
the tape loader but, as might be an- 
ticipated, are much faster in opera- 
tion. Details of these are given 
elsewhere (Bar81d). 


The program illustrated in figure 7 
is assembled to reside in a section of 
the available RAM area of the 
microcomputer. This means that the 
amount of storage available for 
loading BASIC programs is less than 
might normally be the case. Should 
the need arise, this limitation may 
easily be overcome by utilising the ex- 
pansion ROM sockets of the PET. It 
is a simple matter to re-assemble the 
loader program so that it resides in a 
write-enabled IROM module 
(Bar8le) located a base address 
$9000. All demands of the loader for 


BASIC RAM can thus be totally - 


removed. 





Conclusion 

The fundamental nature of a com- 
puter based communication system 
has been described. Currently, three 
broad approaches to data and pro- 
gram distribution are being actively 
investigated: broadcast teletext, 
viewdata systems and distributed 
computing networks. Of these, only 
the latter provides true bi-directional 
information exchange mechanisms to 
be implemented. Such systems thus 
have significant potential for program 
exchange between users of personal 
computers. As those in the public sec- 
tor gain easier access to appropriate 
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The ‘how-to’ magazine all about 
Commodore’s VIC computer 


VIC Computing is a great new magazine for users of the VIC. 
Each issue is packed with valuable programming hints, software 
reviews, ‘how-to’ articles and program listings. 


You don’t have to be an expert to enjoy VIC Computing. It is 
written in straightforward English for beginners — not computer 
experts. 


Features in the first colour packed issue included: “Anyone can 
Program”, an article to teach you to program in one hour; “But 
What Can It Do?”, an introduction to VIC’s capabilities; 
“Expansion of the VIC”, a guided tour of its add-on capabilities; 
“Using Graphics” covering programming in colour; “Converting 
Software for VIC” — how to convert PET programs; “VIC Sound”, 
data sheet on sound generation; plus “Dear VIC”, aeoenee 
Queries” and “VIC hints”. 


It costs just £6 a year to subscribe to VIC Computing. Can you 
afford not to? 


To: Printout Publications, PO Box 48, Newbury RG16 OBD 
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KARSSEMEYER. 

Electronic mail, Library for up/down 
loading, Shopping list 

System hours Tues to Sat 6.00 pm to 
7.00 am 

from 6.00 pm Sat to 7.00 am Tues 


5)\CBBS LONDON tel: 01-399 2136 
System Operator PETER 
GOLDMANN. 
Electronic, mail, Library for 
downloading. Peter says more 
features will be added when time 
allows. 
System hours 
Wed 7.00 am to 9.00 am 

7.00 pm to 10.00 pm 
Fri 7.00 pm to 10.00 pm 
Sun 4.00 pm to 10.00 pm 
To any person or group wishing to 
run or write a bulletin board pro- 
gram. In order to keep all computer 
bulletin boards compatable com- 
mands and terminal software write 
for details of controls, codes etc used 
in the above systems and most 
systems in the United States. - 
To 
Frederick Brown. 
421 Endike Lane. 
HULL HU6-8AG. 
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A Concurrent Clock for the PET 


V.P. Cheah 





This is the realization of one of those ‘Wouldn’t it be nice if ...’’ 
dreams. It is an online digital clock (from now on called klock) which 
can be used concurrently with any Basic or Assembler program 
which does not alter the IRQ vector in zero page. If the IRQ vector 
has to be altered (eg to disable RUN/STOP) then some modifications 


will have to be made. 

Our reason for writing klock may 
sound peculiar to some: neither of us 
are watch wearers and have to rely on 
either the large digital clock supplied 
by the Birmingham Post, which is 
visible from most of Birmingham (ex- 
cept our terminal room) or on other 
people in the room. This soon got the 
better of us as we often missed the im- 
portant issues of the day (eg lunch, 
Opening times etc.) when were at the 
terminals. One day, someone said 
“Wouldn’t it be nice if the PET’s had 
online clocks like the ICL”’. That was 
when everything started ticking. 

The algorithm used by klock is sim- 
ple. On every 30th IRQ, the jiffy 
count is converted into hours, 
minutes and seconds. This is in turn 
converted into its display equivalent 
in screen memory and punched 
directly onto the screen. Although 
this does not cause ‘snow’ to fall on 
the 30XX and 80XX series machines, 
it may do so on the 20XX series 
machines. For minute details please 
refer to the program listing. 

On the 80 column PET, klock is 
displayed on the top line. On the 40 
column PET, it is displayed on the 
second line. The reason for this will 
become apparent if CLEAR and 
HOME are used frequently. If the 
display were on the first line, the cur- 
sor would have to be moved down by 
one line everytime otherwise a syntax 
error would result. Somehow this 
never becomes second nature: in fact 
it gets rather annoying after a while. 

There are two routines (DIVIDE 
and BINBCD) which could be made 
more efficient (either in space or in 
time) but being hard pressed 
postgraduates with little time to 
spare, we have not done anything 
about it. DIVIDE divides a three byte 
number by 60. BINBCD converts a 
binary number in the range 0 to 59 to 
Binary Coded Decimal (BCD for 
those who only recognise short 
forms). This is equivalent to the DAA 
instruction on the 808X and 680X 
microprocessors. The program is fair- 


ly small (248 bytes); it may have to be 
modified for the ever growing range 
of CBM machines. 

Klock given in the program listing 
was written for the CBM 8032. 
Assuming that you have typed in the 
program correctly, all you have to do 
to get it to execute concurrently with 
another program is given below: 
POKE 52,0:POKE53,120:CLR 
SYS machine language monitor 


. L “O:KLOCK’’,80 
4 
Load your program 
SYS clock on 
RUN 

If klock in the given listing is im- 
plemented, it may be enabled by SYS 
30729 and disabled by SYS30736. It 
should be disabled before loading any 
programs. If you forget, the machine 
will hang. If this happens, all you 
have to do is to hit RUN/STOP. 
Klock will stop ticking but the whole 
program will be in core. 

Finally, we’ve found klock so useful 
that we have ‘engraved’ it in ROM on 
one of our machines. 


MELOCK. wa ee se PAGE OOO 

LINE£ Lia CODE LINE 

2002 8000 : FUT “@O:KLOCKs SW" 

' OOO Boa ; PUT "@1LSELOCKs Sow" 

QAO Oooag ; 
OOOS Oooo ; STARTED: 10/04/31: ‘UF 
OoOOe OOOO UPDATED: 13/04/3815 (CLIP 
OOO?F O000 ; 
OOO OOOO ; FURFOSE: BUN A CLOCK CONCURRENTLY WITH BASIC 
OOO? OOOO ; THIS IS DONE BY ALTERING THE INTERSIUPT 
9010 OO8CO VECTOR, TRE SLOME IS UPDATED AFTEF 
QOOLL o000 ; EVERY 20TH INTERRUPT. 

OOL2 oadag ; 
OOS OOOO mm nr rrr rr rrr rr 
0014 o0a00 ; 
OO1S OOO8 += 7Fs00 
OO1lS FOO CLOCK = 141 > JTFFY OUNTEFR 
QOOLF T7300 CENTDOWN *= *+1 7 CLINT DWN 
OOLE F7S01 DISrPas = $0004+5 6 ; DISPLAY FosITICN 
OOL% FEO1 HI = 1 >; THE HIGH BYTE 
OaoZa FeHoO1 INTVEE = 144 >; INTERRUPT VECTOR 
OOz1 TiO 1 CEN ¥=  ¥€4+35 
QOZ2 FHos REM #¥= ¥+1} 

Q023 7305 RSLT #= #473 
OO24 FH RV, = BAC ; REVERSE FIELD 
OOLZE TisOE STOINT = $E4S5 ; STANDARD 2OxXX INTERRUPT 
N0276 T7HOS =TCX += #+1 >; TEMFIIFARY VALUE TF x 
OO27 7se0a7 TORSCR = 2274 ; TOF OF SCREEN 
QOQL8 7HoOY ZERO = $20 ; ZERQ IN ASCII 
OO30 7HOv ; FUREIISEs INITIALIZE OF CANCEL CLUDE 

IOZ1L FEV ; EY ALTERING THE INTERRUPT VECTOR 
1032 JgQ7 ; INFUT oo: CHETIMs STOINT 
OOS T7eor ; CWUITFLIT < INTVEC 

epee’ TsO fae a a oS ee ee eS See ee SS eee ee eee eee 
OOS FRO CLEDFF = #* 

te FH Fz BET LOE OFF 

27 FEOR Ay SS LOA £° STDINT 

TOES Vial Az E4 LOX £°:3TORINT 
Aa37 7SEOE TO O58 ENE =SETVEC 

140 FILO ELEN = 2 

O41 75810 78 SEI > CLOCE CIN 

O42 7211 Ay ZO LOA £<iHETIM 

mwas FEISS AL 7S LOX £°HKTIM 

W442 71S Ss5 70 SETVE STA INTVELC +; SET INTEPFUPT VECTOR 
Q045 7317 s6 “1 STX INTVEC+HI 

OMe, Jii~y AO LE LEY £3 > ‘SET COLINT DIAN 

O47 PSiB sc OO 7s =TY ENTOWN 
O45 7RLE Sm ’ ILI 

mas FEL 420 ETS 
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LINES Ljoc MODE LINE 


QOL 7EZO PURPOSE: CHECK IP IT IS TIME TO ALTER THE 
QOOS2 7HLO ; DTSPLAY, IF IT [Ss THEN CONVERT THE 
0033 73820 ; WJIFFIES INTO HOURS. MINUTES AND 

M054 FLO ; BECONDS OTHERWISE JUST CARRY ON WITH 
QO8S 7HZO , THE STANDARD INTERRUPT. THE CLOLE 
O05 FRO ; Is UPDATED EVERY HALF SECOND, 

O057 7/320 ? INPUT +: CLOCK, CORFA 


OOSS Fez7o ; OLITPLUT = - 

GOS? 7820 ; WISE : OPNDs REMs RSLT 

QO0GEQ FEZ ; CALLS : BINBCDs CLEARs DIVIDE, sTOINT 

OO 1 720 Bie a a a a a a a a ee er rere 
OOes mZO RHETIM = * 

OOS QO CE OO 7s DEC CNTOWN r, TIME Tao UPDATE? 

QOG4 DO 2A ENE GOINT 


OES AY 1E LOA £30 >; RESET COUNTOOWN 
OOS an oo 7s STA CNTOIWN 


0087 
QO 
OO? 
OO7O 
QO7 1 
O07 2 
OO7 = 
O07 4 
OO75 
OO7 & 
O0O77 
QQ78 
OO7? 
OOO 


2 OZ LOX £2 ; TRANSFER JIFFIES TO WORKSPACE 
SD AFER LOA CLOCK s xX 
70 O1 7s STA UFNIts X 


10 Fe DBPL XFER 
AZ OO LEX £0 ; CONVERT JIFFIES TO HMS 

< Sk CLEAR 
7 
= Jk DIVIDE 
LOX £4 
Wk DIVIDE 
Ral T+¥ 
; STA FEM 
AY Ol LBK £1 

Jr BINECD 

GBOINT LOA £1 ; CLOBEER TOF OF SCREEN WITH 
EQ STA TORSICR! > ENSURE CLOCK Is NOT CLEARED 
’ STRINT ; LOINT WITH STO INTERRUPT 
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PURPOSE: DIVIDE RSLT BY 60: INITIALLY RSLT I5 
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QQ27 fae ? 

Oo0ss 7eS4 ; SHIFTEOQ INTO OFND, THE REMAINDER I 
OoOs7 Fess ; IN FEM. THIS ROUTINE FALLS INTO EBINEBICE. 
OO7g FHase ; INPUT « X CPRINTINT POSITION 

QOaQv?, FHse ; CLITPLUT = REM 

OO7Z Jessa ; LUISE : GIPNDs RSLT 

O07s 7sES4 ; CALLS § + 

Co a Pee e Fi ib a a et a IO A SORE SE ON NAS OTE AN IE ND ASO TE SAE: SE 
ao7s FeSeé DIVIDE = * 

oOove FR AL O7 7E LOA RSLT+27 >; XFER RESULT TO OPN! 

Oov?y Fes? sn OF 7e STA OFPNDI+2 

Qoo7es 7ESC AD 06 75 LOA FRSLT+1 

Oor9 7SSF SD O02 7s STA OPND+1 

O100 78é2 AD OS 7s LOA RSLT 

QO101 7845 80 O11 75 STA OFPND 


nec AY OO ELEAF LOA £0 ; CLEAR BISLT & REMAINDER 
seh a0 O4 7S 7° FEM 
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LINEt LOC IDE LINE 


STA SLT 
STA RSLT+1 


0104 7840 8D OS 
Ojos 7eHe7o 80 o-« 
0106 78 ao OF STA RELT+2 

OLG7 Al! Ol LOA OPNI >; FIND NO OF BITS IN DIVIDEND 
Q105 7e7e FO O4 BEG GIT1L4é 

GQ107 76 AO 1 LOY £24 

O110 OO ic ENE SHIFT 

Gi ii AL a2 BITi& LOA OFPNE+1 

O112 FO OD BEG BITS 

QOL11i3 eo Ol STA OFND 

O114 AD os LOA OFNII+2 

OLi5 ao O% STA OFPND+1 

O114 AQ 19 CBDY £12 

ti? DO OA ENE SHIFT 

QO1is AD O32 7 EITsS LOA OFNIM4+ 2 

OF LY PO 2S GEG DT SReg 
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LINE£ LUC MODE 


OisSi 7a? * 
0152 7scr? 
O153 ra 
O154 por] cd 
(34 S55 my? i 
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OLSA 
O157 
O,as 
OLS 
OLea 


aM Dm i 
iD 


-_ * rT 
i st 
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ama fl ome 
SE TY oy Ho Ye Be 


d SIN SEs Sis SES OSS 
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Olé] IZ 
O142 7802 
QO1463 78D2 
Q164 7sSns | 
0165 7e02 
QO1é6e  7any 
Olé? 7SoeZ 
O16 7EeDyZ 
Olé? 7slz 
QO170 7802 SA 
Osi 7eDS OF 
O172 7605 AE 
OY7a 7epe 7D 
QO174 78S0E CA 
OF75 fsb 5 
O176 7SDD or 
O177 Sur 7H 
Q17S 7sez CA 
O17? JEES Ba 
O10 YSES aA? 
C161 7sE7 YD 
O152 75EA 60 
QO1S3 78ER 


FRRORS = O000 


SYMEML TABLE 


SYMBOL VALUE 


EINEICT Fol 
MLE AR: 72S 
INT DWN 7FRBQAO 
DIVIDE Fe 


INTVEC OO 
RSL T PHOS 
STOINT E4s5i 
XFER 720 


END OF ASSEMBLY 


OA 


in 


a FF 


ni rin 
fae ee 


~~ 
— 


fet 4 
rn 


tall m7 
~ 
ea 


~_ 
c=2 
— 


Ce 
Mi I> ty 


“WON NO 
ii m7 om ti 


wd SJ 
iii 


~ 
tii 


~~ 
mn 


OOM4 


mi sd 
— tit 


BIT1é 
PLEOFE 
COINY LS 
ENDOIS 
NEXEIT 
PY IS 

ie TUX 
ZERO 


Ril 
FRLIL 
Rt 
RL 
FL 
SEC 
LOA 
SE 
| ie 
=TA 
INE 
NEXEIT DEY 
ENE 
DISkeo TXA 
BER 


; Fife! 


? 

; TNF 
; CLIT 
; Joe 
; CAL 
? ee 


EINECD 


LINE 


>; THIS 15 
? INTEL #0 


. 
¥ 


SUBLTO SEG 
TAX 
SE: 
Be 
INY 
ENE 


7 CONVERT 


MPNI+ 1 

CPNI 

REM 

RSLT+1 

Rest T 

> CHECE IF > 460 

REM 

tat) 

NEXBIT 

REM 


PLT +2 
SHIFT 


ENDOTS 


Pras: CONVERT 4A BINARY NUMBER TO THO DECEMAL 
NUMBERS IN ASCII FORM, 
UT +: REMs RBRVS: ZERDs X CPRINT PuStTION2 


FUT = OSPR 


= TUX 


we te ee eee 


STOX >; FIND Me AND Ls 
£G ; NIBBLES OF ECD No 
Fr 


SIMILAR TO THE DAA INSTRUCTION ON THE 
SY¥ AND THE MOTOROLA e&8ox, 


E70 


RONVLS 
SUELO 


TO ASCII. FOR SOME ODD REASON THE 


TEM ASSEMBLER DOES NOT LIKE EXPRESSIONS 


MOINTAINI 


; 
? 
i Es LDA £eVS+’ : 
? 
? 


Nit ERROR: 


MONVLIS TXA 
LIRA 
LIIX 
aTA 
TIE X 
TYA 
IRA 
=TA 
DE x 
EMI 
LDA 
=TA 
ENDOTS RTS 


NG ASCII LITERALS 


5 ARE FLAGGED BUT THEY ASSEMELE INCORRECTL r 


>; Le BYTE 
FRVS+ZERO 
STIX 
DISPOss X 


; MSs BYTE 
LRVE+ ZERO 
DODTSPie sy X 


NET 
PRVSES IA 7 SEPARATOR (Cs) 
DTSPiiss X 


» END 


BITS fool CHE TIM fo2 
CL EIN 7Soloe es ae i OCS 
DT SPs OSS DT SRep FEE 


E 
GOINT PoAr HI OOo 
4 


OeND 7eol REM FNS 
Se tYEC 7a15 SHE T 7STE 
SUELO Fac? TOPS e COE C 


20 
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POWER produces a dramatic improvement in the ease of program- 
ming BASIC on Commodore computers. POWER is a programmer's 
utility package (in a 4K ROM) that contains a series of new commands 
and utilities which are added to the Screen Editor and the BASIC Inter- 
preter. Designed for the CBM BASIC user, POWER contains special 
editing, programming, and software debugging tools not found in any 
other microcomputer BASIC. POWER is easy to use and is sold com- 
plete with a full operator's manual written by Jim Butterfield. 


POWER’s special keyboard ‘instant action’ features and additional 
commands make up for, and go beyond the limitations of CBM 
BASIC. The added features include auto line numbering, complete 
tracing functions, single stepping through programs, line renumber- 
ing, and definition of keys as BASIC keywords. POWER’s ‘WHY’ 
command enhances debugging by listing the appropriate program line 
and highlighting where BASIC stopped executing. The cursor move- 
ment keys are enhanced by the addition of auto-repeat, and text 
search and replace functions are added to help ease program modifica- 
tion. POWER can even execute a sequential tape or disk file as though 








TO YOUR ¢A? 


OMMODORE COMPUTER 


it were typed on the keyboard, allowing the user to merge two BASIC 
programs together. Cursor UP and Cursor DOWN produce previous 
and next lines of source code. COMPLETE BASIC PROGRAM 
listings in memory can be displayed on the screen and scrolled in 
either direction. You can even add your own commands to BASIC. 
Like our very successful Word Processing Programs (the “WordPro” 
series), POWER even includes convenient “stick-on” keycap labels 
which define new functions on the keyboard. POWER is a must for 
every dedicated CBM user. 


Call us today, for the name of the Professional Software dealer nearest 
you. 


Professional Software, Ltd. 

153 High Street 

Potters Bar 

Hertfordshire EN6 5BB 

Tel: (STD 0707) 42184 / (STD London 77) 


Power™ js a registered trademark of Professional Software Inc. 














Quotes Test 


Dear Sir, 

I am writing in response to 
an offer in the Editorial of the latest 
copy of CPUCN about the ‘‘Com- 
modore Data Entry Environment”’ 
System. I have a small software house 
Grove Data Systems providing 
custom built programs for PETs and 
I feel that standardization is very im- 
portant. I would be grateful to receive 
iL. 

Oni a different subject I was very 
impressed with the program listing 
routine given in the _ previous 
CPUCN. 

I have added another few routines 
which I have put into it. I enclose the 
whole program which you might like 
to publish. 

I will describe the extras 
1) It prints the title and date at the top 
of the listing (the title may be dif- 
ferent from the filename). 

2) It pages, printing the page number 
and title at the bottom of each page. 
In addition it always finishes a pro- 
gram line before going onto another 
page. 

3) All cursor controls, clear, home II 
etc are printed as CLS RVS 

SPC and so on making the listing 
much clearer. 

The SPC can be a bit over- 
whelming but it makes it possible to 
put in the exact format of say printed 
headings. 

4) The line numbers are 
justified which looks neater. 
5) The “‘in the left hand side margin 
is eliminated by changing CHR$ (34) 
to CHR$ (98) before it prints. 

6) The problem with most listings is 
that anything in “‘ ” in the program 
which is in upper case will appear as 
graphics in the listing. There is a 
routine unclustered which prints text 
as it would appear on the screen. If 
the program switches mode, the 
listing of the text will change mode. 
This makes the listing very readable 
and I haven’t seen it done elsewhere. 
The default value is graphics mode. I 
have included a small demonstration 
listing called “Quotes Test”? which 
show it. In an ordinary listing lines 15 
and 25 would appear identical. 

I hope this is of interest, as you 
mention that you are short of Basic 
Programs to include. It could I am 
sure be polished up but it does work. 

Yours faithfully, Phillip Deakin 
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16866 
18816 


14626 
18838 
18446 


186356 
15866 


18670 
1 hese 
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18206 


GUOTES TEST DATE 


POKES9463. 14 

QOPEN1.4.1.PRIHT#1. "CCccAAaa" 

POKESS469. 12 

a 
4 


QUOTES TEST PAGE 1 


PEOGRFAM LIsT DATE 


DIMOPS$< 75) :SC$="59468 
P : 
PC=1:LC=@:LW=35:8=0:NG=1 : 
OPEH15. 8.15: 0PEN3. 3:E=256 
=CHR$¢34):GOTO1isgda 
INPUT#15.ER. B$, TR, SE IFSE=a 
THENRETLIRN 
PRINTER, BS; TRiSE: GOTO1Ga5e 
GOSUB1815a 

IFCH=4THENigas0 

PRINT" CCRDICCRDICCRDICCRDI 
CCRDICCRRICCRRICCRRICCRR 
PRESSCSPCIANY 

CSPCIKEY" 

GETA#: IFAS=""THEH Gare 
POKE1S&. @: EHD 
FORI=AT075 : READOPS< 1): HEXT: 
DATAEND, FOR. NEXT. IATA, INFUT#: 
INPUT, DIM.READ. LET. GOTO. RUM. I 
F. RESTORE 
DATACSPCIGOSUB, RETURN, REM. STO 
P. ON. WAIT, LOAD, SAVE. VERIFY. DE 
F.POKE. PRINT# 
DATACSPCIPRINT. CONT, LIST. CLR: 
CMD. SYS. OPEN. CLOSE. GET. HEM. TA 
Be. 7O.FN. SPC. THEH 
DATAMOT. STER. +.-. 42.7. tT AND. OF 
y=, <, SGM. INT. ABS. USR. FRE. Po 
$, 50R. PND. LOG 
DATACSPCIEXF. COS. SIN. TAH. ATH, 
PEEK. LEN. STR#. VAL. ASC. CHRS.LE 
FT#, RIGHTS. MIDS. GO 
PRINT"CCLSILIST":B 
=26:FRIMT"CCRDICCRDI" 

CMDS.) INPUT" CCRDICCRIICCRDI 
FILENAMEL SPC] 
PESPC]" FS: FS=LEFTECFS, 15 

3 PRINT 

CMDS, 3: IMPUT"CCRDIDRI 

WECLSPC IHUMBER 
CSPCIPC0SPC1"; DNS: IFDNS 
<"Q"ORDMS>"1"GOTO1S17¢a 

PRINT OPENS. &.0.DH#+":" FS 
"PRG, READ"  GOSUELGaZe 

CH=%:° CMDS, ; - INPUT" CCRIISC 
REENC SPCIORCSPCI 
PRINTERLSPCI? 
CSPCISCCRLI"; AS: PRINT: 
IFAS="P" THENCH=4 

PRINT" CCLS]" OPENS. CH 


QUE 
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16216 PRINT#4. CHRS¢19) 19530 IFSZ=SANDASCCAS>=SETHENSH=6°5 
19228 GOSUBIGH98 =6:>S2=8: GOTO18554 ; 
16236 IFCH=3G0OTO18296 1654@ IFSZ=SANDASC CAS 2=S2THENSa=145 
B24 INPUT" CCRDIWHATCSFCI ‘SY=17: 52-6 
see ISCSPCITHECSFC] 16558 GOSUB1G"S8 
DATECSPCITOUA 16566 IFASCCAS)=S98THENIAS98 . 
TCSPCICSPCICSPCICRYSI 19578 IFAR=1ANDASC< AS) <12eTHEHAe= 
DOMMS SY CRVEICCRLI CHRS¢S'7 2 +AS+CHRE (SHO GOTOLESS 
CCRLICCRLICCELICCRLICCRLI 1958@ IFAR=1ANDASC CAS >> 1S°STHENAS= 
CCRLICCRLI": DF: 81$=LEFT#¢ CHR$¢ S11) +AE ee 
19256 K2$=MIDS¢DF, 3.23: 83S=RIGHTECD 1@59@ R$=R$+A$: IFLENCR#)=>LWTHEN 
$,2):D¢="(SPCICSPCICSPCI FRINT#4.R$:GOSUB1G696:LC=LC+1 
DATECSPCILSPCI"+K = 16606 GOTOi6400 ~~ 
{$+ —"4N0S4"—" 45S: PRINT 16619 IFQORASC*CAS>>263G0T0165968 
18260 PRINT#H4: PRINT#H4 18626 AS=OP $CASC CAS 2-128): IFAS="P 
16278 INPUT" CCRDICCRDIPRO 7 OKE" THENCSPC IS2=1 
GRAMNC SPCIMAME 14636 IFLENCRS+A$>=>SLWTHENPRIHT#4-R 
CSPCI]"; PS: PRINT#4, "PRO $: GOSUB1 6694 : RS=R$+AF > LC=LC+1 
GRAMC SPC INANE 7 ‘LI=1:GOTO18466 
CSPCI]: CSPC]"s 1 ¢19F 168640 R$=R¢+AF:GOTO16406 ; 
$31 C1299 50 16656 ora claltaaai sas 
a2 ‘RINT#4 : PRINT#4 > PRIHT#4: LC=LC+6 =ASC CRS? 
eee bes te ce 19666 GET#C.AS: IFAS<>"" THENLN=LN+E 
16306 LM=LH:2=6:GOSUB1IG658: IFLN=6 #ASC CAS? 
THENPRIHT#H4. RS: GOSUBLAS4&: ig676 GETA#: IFAS="C"GOTO18856 
CLOSES: GOTOLaESe 16696 F$="C(SPCICSPCICSPCICSPCI 
19318 IFLC<SéTHENLGsrs — a tees 
16326 IFLI=1THENIS37r6 ¢ =@G 16726 - 
{A230 GOSUBIBT46:PRIHTH4: PRINTH#H4:LC 18726 IFQTHENRS=CHRS (34) +EEFTSCRS: 
=2:PC=PC+1:GOTOLSSTAa LENSRS 2-1) i 
16346 IFCH=3THENIB3SE6 1973@ IFASCCAS>=19THENAS="CHM 


18338 


FORZ=1T062-LC : PRINT#4: HEXT: enn 





PRINTHS, SPCC 189; F#: "CSPCICSPCI 1@74a  IFASCCAS2=147THENAS="CCL 
CSPCICSPCICSFCIPAG 7 oj" _ 
ELSPC]";PC:PRINT#4: 18?f75@ IFASCCAS =1°THENAS="CCR 
PRINT#4 : PRIHT#4 pi" ; 

18376 IFLENCRES2>LEN¢STRE¢LM3 247 16768 IFASC CAS >=1STHENAS="CR'Y 
THENPR INT#4. R#°LC=LC+1:LI=6 ster; ohm panne. ' 

18386 IFLCD>SéANDLI=GTHEHGOSUBiaS4&: 187? IFASC {AS »=28THENAS="CDE 
PRINT#4 : PRINT#4:LC=2:FC=PC+1 a a : 

19398 GOSUB1G650:RS=RIGHTS<"CSPCI 18788 IFASCCAS)=29THENAF="CCR 
CSPCICSPCICSPCICSPCICSFCI RJ . ; 
CSPCI"+STR#{LH). 594+"CSPC) 14738 IFASC<AS)=1 45THENAS="CCR 
CSPC1" a ‘ 

1a4a@ GET#2.A¢: IFST<POTHEHFRINTCRS: 19866 IFASCCAS>2=146THENAS="CRiV 
EF#: CLOSE2 : GOTO1eesa : ae ae _ 

14419 IPFA=""THENG=8:GOTO1E43a 18816 IFASCCA#=157THEMAS="CCR 

1f426 GOTOie45a oe 

16438 IFAR=1THENAR=a eo ae 

1449 GOTO1e300 PaeLSew betel ras 2 

ig45@ IFAS=UETHENQ=NOTo 

16466 [FCH=4THENLW=78 

1g47@ IFAR=GANDASC CASI =F 1298G0TO18681 18820 IFASCCAS 2=222THEMAS="CPI 

18438 IFAR=GANDASC CAS) =34 THEMAR=1 : CSPC1]" 

GOTOLES5a 19830 IFASCCAP%=14STHENAS="CIN 
=" 
a 19@4g IFASCCAS 2=32THENAS="CSP 
PROGRAM LIST FAGE 2 cy" 
18858 IFASCCASI=34THENAS=CHR SC BED : 

14498 IFAR=1ANDASC<AS>=S4THENAR=8: 5 IFWC=1THENVOC=8 
2=@:GOTO185e85 isssa RETURH 

19508 IFAR=1ANDASC<As?=SSTHENAR=8: 5 
2=@:G0TO18585 

i@S@5 IFSZ=STHENi98558 

18516 IFSZ>GANDMIDS<(SCs. SZ. 1>=A¥ 
THENSZ=S2+ 1 FROGRAM LIST PAGE 4 

Programming Tips 





In the July issue of the newsletter we 
published a short machine code pro- 
gram for helping you recover from 
the disasters of typing NEW when 
really you knew you shouldn’t have 
done. Well, thanks to Mark Hum- 
phrey, resident genius at Supersoft, 
we have a far simpler method. No, it 
does not involve reaching for the 
nearest bottle of whisky, but rather 
the following sequence of 
commands:- 


BASIC 1 - POKE1026,4:SYS50224 
and then RETURN 
BASIC 2 - POKE1026,4:SYS50242 
and then RETURN 
BASIC 4 - POKE1026,4:SYS46262 
and then RETURN 


After this I would strongly recom- 
mend SAVEing (I know it’s not spelt 
like that, but the keyword is SAVE 
after all) your program, as an attempt 
to add lines to that program will 
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result in some very strange things 
happening. However, for those of you 
with Basic Aid, Toolkit, or anything 
that has a FIND command, we can 
get round this, providing that Basic 
Aid or whatever is up and running at 
the time. After doing the POKE and 
SYS commands, type in - 
FIND/BANNANAS/ 

or any other word which is not likely 
to occur in the program, and hit 
RETURN. Voila! All is now safe. 











Gentle Adventure 





Once upon a time, deep, deep in the 
forest, lived a family of Dongles. 
They had lived there happily for 
generations, secure and _ peaceful. 
Father Dongle, a trader, used to go to 
the village to work, and there he 
would turn the key of his silicon of- 
fice and with his office mate settle 
down for a good day’s labour. Mother 
Dongle used to stay at home looking 
after the little Dongles, especially 
Graham Dongle, who for a twelve 
year old was difficult to monitor. 


She would entertain them with all 
their favourite stories. Adventures 
with the wizzard of ozz were always 
the stories they wanted to hear, and 
she found it difficult to stop for them, 
even to kram some food down them. 


Not so father Dongle, who was very 
skilled at cracking hidden messages, 
and who always went to the village 
inn at lunchtime for a pint of Old 
Netkit, a renowned local brew. He 
was so good at this skill that in the 
village he was known as the champion 
bar code reader. But he never used to 
stop there for long - soon he’d be back 
in his office beavering away. 


In the evenings the whole family 
used to gather round the fire, and the 
children would be told stories warn- 
ing them not to go into the forest at 
night. The story that always frighten- 
ed them the most, and made sure they 
didn’t stray far, was about the evil, 
corrupt family of Disks who lived in 
the heart of the forests where the trees 
were densest, and the ferns were pret- 
ty stupid as well. 


At the weekends the whole family 
used to go to one of the prettiest spots 
in the area. There they would meet 
their near neighbours, the Mupets. 
Whilst the fathers would find that 
there was plenty of rom at the nearby 
inn (The Prep and Telex), the little 
Dongles and Mupets would happily 
play in the nearby river, trying to 
avoid being stung by the bees. 


And so this happy scene continued 
for many weeks, until one day a new 
family came to live nearby - once 
given the key of their new home, the 
‘Data’, the Mafia were ready to move 
in! 


All the little Dongles and Mupets 
were told to stay away from the 
Mafia, and this they did. The corrupt 
Disks may have been a myth, but the 
Mafia were very, very real. 


One day, at the height of the sum- 
mer, Graham Dongle was wandering 
alone through the forest, minding his 
own business, when who should ap- 
pear but C.B., the Mafia’s evil 
Manager. Graham was frightened at 
first, but soon, under the wicked 
charm of C.B., he was talking happily 
away and the two of them began walk- 
ing together. Getting ever nearer to 
the ‘Data’ as they went, it wasn’t until 
they got inside that Graham realised 
he’d been kidnapped! 


C.B., threatening to break 
Graham’s legs if he tried to run away, 
sent a ransom note to the Dongles. 
Father Dongle read it, and the whole 
family went into mourning. The note 
read ‘‘We will return your son, if you 
send us 1,000,000 Turnkeys’’. 

“But I only earn 20 a week’”’ sighed 
father. 


Mother was distraught. “If only 
Supercow were here....” 


Meanwhile, in a field not too far 
away, a herd of cows was quietly graz- 
ing on the grass, munching con- 
tentedly in the sun. One of them, call- 
ed Clark, was in a particularly good 
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mood that day. No real reason, but 
life was treating Clark well lately. 
‘It’s a cow’s life’’, he mused. 


The farmer came rushing into the 
field, shouting to one of his hands 
“Its the Mafia! They’ve kidnapped 
young Graham Dongle!” “Oh No!” 
cried his other hand. 


‘““Hmm’’, thought Clark, ‘‘sounds 
like a case for Supercow. But how can 
I get away without anyone noticing ?” 
For mild-mannered bovine Clark was 
really the astounding Supercow, able 
to leap tall barns in a single bound, 
more powerful than a combine 
harvester, faster than a speeding trac- 
tor. And then he thought “‘Easy. All I 
need is a telephone kiosk’’. 


Apparently without concern, 
whistling a little tune as he went, he 
began strolling over to the edge of the 
field, where a rather large telephone 
kiosk was situated. Showing suprising 
agility for a cow his size he leapt into 
the kiosk, only to emerge seconds 
later as SUPERCOW, resplendent in 
cape and with a large letter ‘S’ 
emblazoned across his chest. 


As he flew over the barn, a group of 
cows stared in amazement. 
“Is it a wombat ?” 
“Ts it a flying VIC ?” 
“No, it’s Supercow!!!”’ 


Supercow, flying faster than an ex- 
press dairy, raced to the scene. C.B. 
looked in amazement as a cow with a 
cape and red underpants burst in 
through the door. He fired bullets, 
threatened to chop legs off at the 
knees, but to no avail. Mighty Super- 
cow picked up young Graham 
Dongle and whisked him back to the 
safetly of his family. 


“Thank you Supercow’’, said 
mother Dongle. ““How can we ever 
repay you P” 


“‘No repayment ma’am. Simply 
remember what we’re fighting for. 
Truth, justice and the arable way of 
life’’. And with that he was away, and 
Graham Dongle had learnt a lesson 
he would never forget. A Dongle 
should always stay at home. 
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PAYROLL PLUS £150 + VAT 


This must be the finest PLAIN PAPER PAYROLL system available for the CBM PET. 


It is designed to the Inland Revenue Specifications for Computerised Payroll. The program is very ‘user friendly’ and 
should present no problems even to those who have had no previous computer experience. The manual is written in 
simple language and avoids computer jargon. 


WORDFORM £75 + VAT 


This remarkable MACHINE CODE program will solve the problem of the majority of PET owners who desire high- 
grade word-processing capability but cannot really justify the usual high prices associated with the better packages. 
It will literally perform 90% of the functions of the expensive programs, and it would be rare to require the extra 
few functions in actual use. 


See them at your approved dealer 


Published by LANDSLER SOFTWARE 29a Tolworth Park Road, Surbiton, Surrey Tel: 399 2476 





PETALECT. An all-round computer service. 


PETALECT COMPUTERS of Woking, Surrey have the experience and 
expert capability in all aspects of today’s micro-computer and word 
processor systems to provide users, first time or otherwise, with the 
Service and After Sales support they need. 


COMPUTER REPAIRS AND SERVICE 

If you’re located within 50 miles of Surrey, PETALECT can 
offer FAST, RELIABLE Servicing with their own team of 
highly qualified engineers. 

24 hour maintenance contracts available. Our service contracts 
start at around only 10% of your hardware cost per annum 

for on-site, or if you bring it to us at our own service dept., 

it costs only £25 plus parts. Representing real value for money. 


MICRO COMPUTER SUPPLIES 


PETALECT can supply the great majority of essential microcomputer-related 
products promptly and at really competitive prices. Such items as:— 


TAPES@PAPER@FLOPPY DISKS@®PROGRAMMES FOR BUSINESS@SCIENTIFIC OR 
RECREATIONAL APPLICATIONS@®@MANUALS@®COMPUTER TABLES @DUST COVERS 
RIBBONS @®TOOL KITS@®PRINTERS@ELECTRONIC INTERFACES WHICH ARE 
PETALECT’S SPECIALITY. 

If you want to find out more about what we can and would like to do 
for you, why not give us a ring on Woking 69032/21776. 























We’re worth getting in touch with. 
SHOWROOM = = SERVICE DEPT. 


32, Chertsey Road, Woking, Surrey p ak 33/35 Portugal Road, Woking, Surrey 
COMPUTERS 




















NOTES ON 8032 & 12” 4032 Mark Humphrey 





The 8032 and the new 12” screen 4032 both have a single chip video controller, this is new to the PET and is 
not found on any of the 9” screen machines. This chip completely controls the video display and has 18 
registers which control various aspects of the display. 

Firstly although the chip has 18 registers it only occupys 2 locations in memory, the first ($E880 Decimal 59520) is 
an address register and the second ($E881 Decimal 59521) is the location of the other registers. Each register is address- 
ed by poking the number of that reigster into the address register, and then that register will ocupy address 59521. Un- 
fortunately both the address register and the most of the 18 control registers are read only so it is worth remembering 
what you poked it with. 

Below is a list of all the control registers and their function. To prevent ambiguity I shall explain a few of the terms I 
have used. The screen is the physical glass screen. The Frame is the area of screen between the upper and lower edge 
and left and right margins which actually displays the picture. The upper and lower edges are the very top and bottom 
of the picture. The left and right margins are the extreme left and right edges of the picture, it is however possible to 
have the left margin to the right margin. A line as an actual scanned line (8 of these make up one character 
block). A display line is a length of characters usually 8 lines high, from the left margin to the right margin. A column is 
each individual dot position (there are 8 columns in a character and 640 columns on an 80 character display line). A pix- 
el is one line in height and one column in width. 
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Mixing SYS and USR functions on the PET 





from Alan Price - Liverpool Polytechnic Department of Mathematics 


This article describes the facilities for pasing data to and from machine-code routines called by the BASIC 
SYS and USR commands, and shows how multiple SYS and USR functions may co-exist. A method of 
changing the number and type of parameters which USR can accept is described. Specific details of the 
PET monitor and BASIC interpreter refer to the PET 30XX (BASIC 2). 


SYS and USR facilities in BASIC 
allow the use of machine-code 
routines to augment the facilities of 
BASIC, either because they do not 
exist in BASIC, or because of speed 
requirements. SYS is a command, 
followed by a store address of the 
machine code to be obeyed. This 
must make its own arrangements to 
communicate with BASIC, e.g. by us- 
ing routines in the BASIC interpreter 
to read the remainder of the SYS 
command. See, for example, pages 16 
and 17 of CPUCN volume 3 issue 3. 
As I showed in that article, the inter- 
pretation of the SYS itself can be 
quite time consuming, being most ef- 
ficient if the SYS address is 0. This 
would appear to make the co- 
existence of multiple SYS and USR 
functions impossible. 

USR is treated as a function. As 
described in the BASIC manual, it 
can have one parameter, which must 
be a numeric value (constant or ex- 
pression) and can return one value, 
which can be numeric or string. Since 
it is entered via store locations 1 and 
2, it would appear that there can only 
be one USR function at a time. 

Multiple SYS commands can be 
implemented by arranging all SYS 
commands to go to location 0, which 
contains a jump to a routine to read 
the next character from the program, 
and use it to select one of a number of 
routines from a Jump Table (see the 
article by Mike Gross-Niklaus in 
CPUCN Vol 3 issue 3). If the jump 
table is set up to correspond to the let- 
ters of the alphabet, SYS.A would be 
sent to the routine with the first ad- 
dress in the table, SYS.B the second 
and so on. The reason for the full- 
stop is that BASIC must read a 
numeric value after SYS, which we 
want to be zero: and . followed by 
anything other than a digit or E is the 
shortest and quickest way of achiev- 
ing this. The letters A,B and so on are 
not BASIC variables, and do not take 
up space in the variable store. This 
method of entering SYS routines is 
fast (about 1.02 milli seconds) and the 


BASIC programmer does not have to 
know the actual store addresses of the 
machine-code routines. 

This would seem to scupper the use 
of USR functions. The solution to 
that is simple, if draconian: to insert a 
‘““wedge’ into BASIC to trap USR 
functions before BASIC evaluates 
then become very much like SYS 
code, and read as many parameters of 
whatever type they like. The dif- 
ferences are that USR code should 
check that the last parameter is 
followed by a closing bracket, and 
must leave a value (numeric or string) 
lying about for BASIC to pick up on 


10 REM"DYNARRAY" 22/06/81 


exit from the USR function, in the 
usual way. 

The machine-code routine shown 
provides multiple SYS and USR 
facilities. It is loaded into the second 
cassette buffer, but could be modified 
to sit in high memory if preferred. 

Location $827 contains a count of 
the number of addresses in the jump 
table, which is stored in $828 on- 
wards. The program starts in $880, ° 
leaving room for 26 addresses, cor- 
responding to the letters A-Z. The 
Monitor routine CHRGET, at store 
location $112($70) is altered to jump 
to $880, which tests whether a USR 


20 PRINT"DYNAMICALLY EXTENDABLE ARRAY FACILITY 


30 PRINT" RREKEKEREREERERKEEREEKEKEEKREKKEKEKKEEKK 


40 PRINT 


50 PRINT"A ONE-DIMENSIONAL ARRAY OF ANY TYPE MAY 
60 PRINT"BE EXTENDED AT ANY TIME BY A CALL OF 


70 PRINT"THIS ROUTINE, E.G. 
80 PRINT"SYS826,A(5) 


90 PRINT"THIS WILL EXTEND THE ARRAY A BY 5 

100 PRINT"ELEMENTS, MOVING ANY LATER ARRAYS UP 
110 PRINT"THE STORE TO MAKE ROOM. THE NUMBER OF 
120 PRINT"ELEMENTS ADDED MUST NOT EXCEED THE 
130 PRINT"CURRENT SIZE OF THE ARRAY, IF THE 
140 PRINT"ARRAY DID NOT EXIST, IT WILL BE 

150 PRINT"AUTO-DIMENSIONED WITH A SIZE OF 10 
160 PRINT"BEFOR EXTENSION (BY UP TO 10). 


170 PRINT" ERRORS :- 


180 PRINT"BAD SUBSCRIPT ERROR EXTENSION TOO BIG 
190 PRINT"SYNTAX ERROR NO COMMA AFTER 826 


200 PRINT" oman 


MORE THAN ONE DIMENSION 


210 PRINT"OUT OF MEMORY ERROR NOT ENOUGH SPACE 

220 PRINT"NOTE:-THE NEW ELEMENTS ARE NOT ZEROED 

800 FORI=8261T0936 : READJ: POKEI,J, : NEXTI 

826 DATA 32, 248, 205, 32, 109, 207, 196, 44, 176, 7, 197, 45, 176, 3 
840 DATA 76, 3, 206, 229, 85, 133, 110, 152, 229, 86, 133, 111, 160, 4 
854 DATA 177, 92, 201, 1, 208, 236, 160, 2, 24, 165, 92, 133, 37, 113 
868 DATA 92, 170, 200, 165, 93, 133, 38, 113, 92, 133, 93, 134, 92, 165 
882 DATA 47, 166, 46, 133, 88, 134, 87, 101, 111, 168, 138, 101, 110, 144 
896 DATA 1, 200, 133, 85, 132, 86, 32, 216, 194, 160, 6, 24, 177, 37 
910 DATA 101, 97, 145, 37, 136, 177, 37, 101, 98, 145, 37, 160, 2, 177 
924 DATA 37, 101, 110, 145, 37, 200, 177, 37, 101, 111, 145, 37, 96 


READY. 





10 REM INSTAL CODE FROM DATA TO HIMEM,ADJUST HIMEM 


20 FORI=1TO2 


30 READZ:W=PEEK (52 )+256*PEEK (53) -Z 
40 FORY=WTOW+Z-1:READX: POKEY ,X:NEXT 


50 Z=INT(W/256 ) :W=W-256*Z 


60 POKE48 ,W: POKE50 ,W: POKE52,W: POKE828+2* PEEK (827) ,W 
70 POKE49,Z:POKE51,Z:POKE53,Z:POKE829+2*PEEK (827) ,Z 
80 POKE827,PEEK(827)+1:REM INCREASE ROUTINES COUNT 


90 NEXTI 


100 DATA34:REM 16-BIT PEEK- USRA(<ADDRESS>) 

110 DATA165,18,72,165,17,72,32,139, 204,32, 210,214 
120 DATA32,242,205,160,1,177,17,170,136,177,17 

130 DATA168,104,133,17,104,133,18,138,76,109,210 
140 DATA38:REM 16-BIT POKE- SYS.B<ADDRESS>,<VALUE> 
150 DATA32,139,204,32,210,214,165,18,72,165,17,72 
160 DATA32,248,205,32,139, 204,32, 210,214,170,104 
170 DATA133,17,104,133,18,152,160,0,145,17,200 


180 DATA138,145,17, 96 
READY. 


function is being processed by look- 
ing at the stack; if not, the instruc- 
tions which were in CHRGET at 
$112-$117 are obeyed at $906-$911. 
If USR, the character immediately 
after USR is saved in X, and the next 
character checked to be ‘‘(’’. 

Location $1-2 is set up so that SYS. 
will jump to $932. The letter follow- 
ing SYS. letter and USR letter ( is ex- 
ecuted. ($939-$967). This checks that 
the saved character is a letter A-, and 
corresponds to an entry in the jump 
table, and performs an indirect jump 
to it. 

The machine code initially stored 

in $826-$864 can be called by SYS 
826. This plants an RTS instruction 
at $826 to prevent re-initialisation, 
and sets the initial value of the jump 
table count in $1-2, and alters 
CHRGET to jump to the USR code. 
All the user has to do is fill up the 
jump table, and alter the count in 
$827 to match. 
Note that SYS.E should not be used, 
as E is not a number terminator: it 
may be reserved for a USR function, 
i.e. USRE (---). 

Having thrown away the BASIC in- 
terpreter USR action, what will you 
have to do to replace it? The simplest 
way to tell is to look at what you are 
missing, i.e what BASIC does to 
USR. In the general expression 
evaluation routine, if a symbol with 
internal ‘token’ of value $B4 to $CA 
appears, this represents a function. 
The $80 bit is removed and the result 
saved, shifted left one place (i.e. 
doubled), ready to look up a jump 
table stored in $C046 onward. The 
entry in the jump table corresponding 
to USR (token $B7) is zero, causing a 
jump to location zero, where a jump 
to the actual location of the USR 


function must be stored, e.g. figure 1 
The machine code described in para. 


6 effectively takes USR functions out 
from $CE8F, so you are losing the se- 
quence from $CEB3, onward e.g. 
evaluation of parameters, entry to 
function, and testing the type of the 
result. Useful routines are as in fig. 2 
If you make your own strings or 
floating-point numbers, location $7 
must be set to indicate the type, e.g. 0 
for numbers -1 for strings. See the ex- 
amples on page 17 of CPUCN 
Volume 3 issue 3. The evaluate and 
convert routines described above set 
$7 correctly. RTS (Return) at the end 
of your code will return to the address 
that the code at $CC8E does, i.e. 
bypassing the numeric test. Note that 


an ordinary USR function can bypass 
the test by executing PLA PLA 
before its final RTS. 

As an illustration, the second pro- 
gram installs two pieces of machine 


code in high memory, and plants 
pointers to them in the jump table. 
The first, called by USRA (address), 
is 16-bit PEEK: the second; SYS.B 
address, value is 16-bit POKE. 





10 REM SET 


UP MULTIPLE SYS/USR FUNCTIONS. 


11 REM TRANSFERS MULUSR TO BUFFER >4£2,THEN 
12 REM INITIALISES SYS/USR AND CLEARS THE 
13 REM JUMP TABLE COUNT. 





100 FORI=826T0924:READJ: POKEI,J:NEXT 
101 REM LOAD MULUSR TO BUFFER 32. 
110 SYS826:STOP 
826 DATA 173, 96, 3, 141, 58, 3, 169, 0, 141, 59 
836 DATA 3; 169, 164, 133, i, 169; 3; 133, 2, 1698 
S46 DATA 5, 185, i22, 0, 170, 185, 138, 3, 153, i1iz 
S56 DATA 0, 138, 153, i138, 3, i336, 16, 239, SG, 255 
S66 DATA 0; 255, 0; 255; 0, 255, 0, 255, 0, 255 
876 DATA 0, 255, 0, 255; 138, 72, 2186, 189, 2, 1 
886 DATA 201, 142, 208, 14, 189, 3, 1, 201, 206, 208 
896 DATA 7, 189, 4, 1, 201, 110, 240, 11, 104, 170 
906 DATA 76, 112, 3, 234, 234, 234, 76, 118, 0, 104 
916 DATA 104, 104, 104, 32, 138, 3, 170, 32, 138, 3 
9826 DATA 32, 245, 205; 76, ITl, 3,5 32, 118, 0, 170 
936 DATA 32, 138; 3, 138, 56, 233, 65, 176, 3, 76 
946 DATA 3, 206, 205, 59, 3, 176, 248, 10, 168, 185 
956 DATA 60, 3, 133, 82, 185, 61, 3, 133, 83, 108 
966 DATA 82, 0 
READY. 
figure 1. 

$CE89 ASL A ; 2* token less 380 

PHA ; save jump table index 

TAX 

JSR $70 ; get character following function token 
$CESF CPX #$8F ; test for LEFT$, RIGHTS, MID$ 

BCC $CEB3 

JSR $CDFS ; string functions - check for "(" 

JSR $CCOF ; evaluate expression - first parameter 

JSR $CDF8 ; check for comma 

JSR $CC90 ; check parameter is a string 
$CEBS JSR $CDEC ; evaluate (expression) 

PLA 

TAY 

LDA S$BFDE ,Y ; do jump table lookup 

STA $52 ? 

LDA $BFDF,Y ; ($51 contains "JMP" code) 

STA 353 

JSR $51 ; subroutine jump to function 

JMP $CC3E ; on return from function, test type 
$CC8E - in $7 is numeric, RETURN. 

figure 2. 

JSR $CCOF Evaluate expression (numeric or string) 
JSR $CC90 Check expression is string 
JSR $CC8E Check expression is numeric 
JSR $D6ED2 Convert numeric value to integer 
JSR $D26D Convert integer to numeric (floating point) 
JSR $CDF8 Check for comma 
JSR $CDF2 Check for closing bracket 
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Peripheral Spot 








Another collection of disk-based programs for you, and a very overseas based collection at that. The ma- 
jority of the programs come from Peter Gabor, of Gaborton in Israel, and include programs to inspect se- 
quential files, a revamped version of an earlier program which is an editor for relative files, and finally a 
program that allows a repeat function to co-exist with DOS support. This latter is most useful, as it goes 
into great detail on how the programs were written, and should thus serve as a useful guide to those of you 
attempting to do a similar thing. 








INSPECT SEQUENTIAL FILES - Peter Gabor MACHINE CODE LISTING 
-Peter Gabor 


ti TFRPRTHEHS1 = 

aa PRINT’ COLE EhPFES bd Ssesssess esses essessee” , 

4 PRIHT" ~ +" . re US Gites cease = Be mae a 
4 PRINT" + INSPECT SEQUENTIAL FILES +" + ies ne Hes aA = = Se ie 
SO (PREG ET - lean .: 7OCe 85 OA AD Be BS OB AS Ae 
Be FRIHT" FEE FOHEEEH4 4444494944444 9444¢44e[ S011)" 3 FOCR SS O2 AS AS 25 O4 AD ag 
mM) IFPEER CTS) oS 1SSANOPEER (Pod) =SSTHENSY S726 REM DISABLE FEFEAT .: 7000 85 03 AZ oe BO ae a2 Fa 
BM PRoPEER CS S4855 :FORESS4e0n.14: FEM SET TO LOWER CASE » FooS ar = prs) e FR 4c: Cie ra 
S04 PRIAT"A MACHIHE COOE PROGRAM FOR IHSPeECcTIrorn" a FDEG 26 D1 2@ 62 ES AZ a2 2a 
148 PRIWHT"OF sSEOUENMNTIOHAL FILES Is Hob BETH" ~ & FDES AF Fr AS Be Ae ee aE AR 
Leo Pa a. CT” .: FOFG 1@ 2@ 35 F3 Fa a3 4C a2 
126 PRIHT"THIS FROGRAM WILL CO-EXIST WITH AHY " .§ #OFG@ 7E 20 £4 FF FO FE Ae az 
136 FRINT"OTHERP FROGRAM TO GE LOADED.” _: PEGG 20 AF FT AS Ge 2e CO Fi 
14 PRINT" CCOITO CALL THE PROGRAM IM THE FUTURE, SET" -: 6 7EQS Ad 96 De @& AE aa ie AG 
158 PRINT"OISPLAY TO LOWER CASE AHO ENTE CRYSISyYSS217r" ’.) 67Ei@ aa 4C 23 7E AS aa AB ae 
168 PRINT"CCOITO STOP LISTING, PRESS CRYSISTOPCOFFI KEY. -: 7E1@ AS D2 26 E2 F2 2@ CC FF 
178 PRIHT"TO CONTINUE, PRESS AN OTHER KE’ _: VE2@ 2 FF BS AS Ce AO Oe aS 
158 PRIHT" TO SLOW arom DISPLAY. PRESS CRVWSIOFFARYSCOFFIJ. .: YrE2S 2a S&F ER AD Bea 4c EE F 
19 POKES2.176:POKESS.125: REM LOWEP MEMORY <S2k PETS! 1 -: 7E3G 98 9D Ca 83 ES Ee 28 9a 
284 OLUAD" SEQ SYS32 > .: VE38 BS 4C 28 7E AA AA AA AA 
ote: PRIME ECO... a ae eneipeence emeaeeten, Sonmemeee aa gt ‘ 

2286 PRIHT "CRs 700 ‘OL LIS ‘H “To ‘IHSPECT A FILE HOW? SH" ® 

238 GETAS: IFASC?"Y "ANDAS<S "HH" THENS 38 READ". 


248 IFAS="""THEHPRIHT"* CCOJEHTER NAME OF FILE! ":sysse1rr 
258 POMESS4a3 PE sPRINT"CCLEI" :HE-M 





FIXIT-EDITOR FOR RELATIVE FILES [S75 FEN PHOREE EERE 


1358 FEM + SET FANGE FOrF IHSPECTION + 
- Peter Gabor LSS PEM $446 44s44eeo4444 e444 44444944 

lass FEM 

2608 INPUT’ CHOMEIFIRST BYTE TO BE WIEWED CSCI" :AF 

Sei TFAF=" "THENOCLOSE :G07TOS88 

2020 FR=VALCAS> 


14 REM EREREEEERESEESEESEEER ERE SERED IFPL—-FeE<Si THEMLB=FL G0TOS 1 

2a REM # ba IHFPUT"HR OF BYTES TO BE VIEWED" sa 

3H REM # ete st F * A="AL*C AS) ss TFRSSTHEMPRIWNT"RAWGE TOO LARGE!" s60ToSsh4e 
4a REN #* bg IFFR+A=FPLTHENMLB=FL :G0TO8 14 

Seo REM # EQITOR FOR RELATIVE FILES * LB=FR+A-1 :GOTOE1a 

56 REM # 1°6-81 + FEM 

yu REM # ¥ PEM $¢4¢4¢4¢¢44F4¢4¢44¢44 44444444444 

BE REM saiod add aS dab dk a a REM + INSERT * 

36 REM FEM tet ee EEE EEE ED EH EES SE 

ime 2=1,/254 = PEM 


268 G$ceo=" CRYSI B2S=LEFTS*" "+8St,-LENCB2$> 3 











—— i. . et he he he 
218 GSciv=" CRYST | B11 12ISIF IS 1617 18191 E GOSUBS2H8 :GoTOr ae 
228 Gée2.=" CRYSJ —-+—_+—++_++--++-_++""++"+H $438 REM 
230 Gs¢S>=" CRVS]} ({[COFF] | ti ttitbtttl 4035 REM +$¢¢¢¢os 40000 oo 004 e8 toe EEE 
258 GMS=""— CRVS] -—-+COFF]—+-++++++"+++44 4445 REM * CELETE * 
268 GRS="  CRVS] -—-foFF]—++141111 11-4 4045 REM 440s eee ee 
32a6 ACS="C(CRI" :0$="C4C0I" :SP$=" "sADs="C3C01" 4843 REM 
318 FORK=1 705 :SP#=SP$+SPS sAOS=ANS+0F sACS=ACS+ACS sNEXT 4850 B2S=NIOS¢Bet,29+" " 
B28 CYS=LEFTS¢(ACS,.72 sSPS=SPS+LEFTS (SPS, 1H? S660 GOSUBS SAA sGoTOrSaS 
336 PPS=" " sTMS=CHREC13> 4886 REM 
458 GOSUBT eas S555 REM soe 
saa INPUT’ CCLRIINPUT FILENAME C3CLI" As 4898 REM + CRSE LEFT * 
Sim IFAS="" "THENPRINT"CCLRI": :ENO: REM JUST HIT RETURN $095 PEM $3444¢40ee0e0e0 EEE 
S2a LFAS<>"#" THENHFS=AS TO EXIT 4433 REM 
S7@ INPUT’ CCOILENGTH OF RECORD" RL $106 IFLEN¢81$>=G0RBH=FBTHEHTa@@ : REM CURSOR IH FIRST FOS 
SSG OOPEMH#1, (MdF$>,.L°RL? 08 $118 B=1 :G05UB4 ran 
i 53a [FRL>S8THEN2Zeae $128 GoTOTaS 
i saa FR=1:LB=RL 4138 REM 
610 GOSUBSEOG :0S="CCDI—"s REM PRINT GRIO F135 REM salhanidadanioi aici: 
626 GOSUBSSG:INPUT"RECORD # C3CLI" sRS 414@ REM # CRSP RIGHT + 
i 638 GOSUBIGEG:IFRS="""THENDCLOSE :GoTOSaa $145 REM Ss ee 
: S48 REC=VALCRS> 4143 REM 
656 RECORD#1. “REC? :GOSUBSS8 $158 IFLEH{82$>=G0RBH=LBTHEN? OS : REM CURSOR IM LAST Pos 
] 568 GOSUBS4ae: REM REAO RECORD 4160 B=1:GOSUB47Sa 
f SS8 PRIHT'’RECOROD # "RECs $178 GOTOTAS 
i S38 GOSUES2AG :POKELSS,o: REM WRITE ON SCREEN 4188 REM 
i 7aa GETAS: TFAS=""THENTOE : REM EDIT $185 REM asso Ee 
Fie IFAS="CINSTI]" THENS6ae 4198 REM * CURSOR UP + 
| Fee IFAS=CHRS* 28> THEN4e5a 4195 REM sass 
i 738 IFAS="CCLI"THENS18a 4193 REM 
| P48 IFAS="C(CRI"THEHS158 $208 IFLEN¢B1$><1G0RBN<FB+iETHENTee : REM HO HIGHER LIME AVAILABLE 
Poa IFAS="CCUI"THEN4+2a8 $218 B=18:GOSUB47aa 
FSM LFAS="CCOI" THEHS2548 s228 GOTOTae 
| 77a IFAS="8" THENPRINTOS sG0TOSee 4238 REN 
PS IFAS="T" THEMHREC=REC+1 sPRINTOS :GOTOS6Se $2235 REM 3s ae 
TS [FAS=CHR S$: 34> THENAS="8" :GOTO43e8 4246 REM # CRSP DON * 
S88 LFAS=CHPS* 141 >oTHENFSSHe $245 REM 33s ee 
S18 IFAS=CHPS* 139 THENAS="4" 2G0TO4 S88 4243 REM 
Ssh IFAS="CHOME]" THENSSe $250 IFLENCB2$> <1 G0RBH>LB-1EaTHENT ee: REM HO LOWER LINE AYAILABE 
| S608 [TFAR="CCLPI"THEMOCLOSE :PRINT" CHOMEI" : sEHO $268 B=18:G0SUB475u 
| S38 650704308 4278 GOTOraa 
336 REM 4286 REM 
SSS REM seed ae ee oe tee $285 REM sides ada de ok a ee 
S48 REM # CURSOR TO LINE # 24 ¥ $296 REM *# PRINT AS & MOVE MARKER # 
345 PEM €#F¢4S4 FF SSFS SSeS SoHE SS HHH EH 4295 REM sss eee ee 
S45 REM 4293 REM 
S54 PRIHT" COLE I"ADESLEFTE* SP#, Sao" CCLEI"ADF: sRETURV $388 PRIHTAS"CCLI" s sB2S=ASt+H INS Bet,2: 
255 REM $318 GOTO415e8 
| FIi5 PEM FEES EEESEEE EES Ee HEE EEE E EES 4536 REM 
338 REM + HECK ERRORS + SEAT REM sade aed ae aa aa me ae 
S55 FEM ##¢SSEEEEEEEESESESES OHO HEHEHE $698 REM # SBF FOR CRSR LEFT + 
235 REM $695 REM 333s ee 
1a@ae IFOS<2ESTHEMRETURH 46532 REM 
114 PRINT" CRYVSI]"OS¢ :OCLOSE :EHD 4744 PRINTOS :BH=BN-B :GOSUBSSaa 











B2$=RIGHT#(B1%-B+B2% 

B1$=LEFT$(B1%,LEN<B1$2-B? 

RETURM 

REM 

REM ses eae ede aco ea a a a a 

REM # SBR FOR CRSR RIGHT + 

REM HseSaEESrE iC kab ade 

REM 

PRINTOS :BN=BN+B :GOSUIBSSaa 

BiS=B1iS+LEFTS<(B2s,8> 

B2S=MIOS(B2e,1+8) 

4738 RETURN 

4785 REM 

4798 REM saekenickok anor 

4795 REM # REPLACE RECORD “ENTER? + 
REM dseeeeea dai icidak tei dit ob 

REM 

PRINTOS :GUSUBSEae 

RECSREC+1 :G0TOSeSea 

REM 

POET sates ates aes eo ee a 

REM # PRINT GRIC ON SCREEH * 

REM aHiGhaREEEe aaah aioe 

REM 

PRIHMT" CHOME" 

FORK =8TO3 

PRIMTGS<K > :NEXT 

FORK=INT“FB“1@>TOLB18 

H$=RIGHTSCSTRECK? 2? 


477i 
4728 
4738 
4735 
$74a 
4745 
4$F48 
4749 
478 
47 eu 
4778 


, 
1 


Py oy mh OB he Uo ae mo op 


, 
a! 


Bu Wo i ko co oo ma x 


mI 
a! 


wr 
mi 


ea GHE="" CRVSI |" +Hs+" [CORP I lf ERA 4 
A PRIHTGHS rPRINTONS HES T 

PRIHT' COUI "GBS sRETURN 

REM 

REM SEES ERR EH ER EH 

REM # FUT Bes OM SCREEN #¥ 

FELT ESE: SE MESSE SE HE EOE Oe a ie a oe oe 

REM 


BM=LEH* BL $9+1 :GOSUBSSae : REM 

PRINT" CCOI-CCU,CLI" » sFORK=1TOLB-BH+1 
B''F=MN IDS RSE. 1% 

PRIHTEY$"CCRI" : :PS=PS+1 
IFPS=18THEMPS=8 sPRIMTTMSTMSCr Ss: sREM 


SOO MOAR OOM eR OO me ei oo 


=, 


a ee 
1 (Sr 


1m CO OM OM CON Og ce sO 


Ja Ob to hae ff 
i 


mht ok HEAT 

aebkt GOSUBS EAE 

oer RETURH 

sora REM 

SUS PRET sea soe soko ee ap ee 
S385 REM # READ RECORD INTO ALS * 
=35 REM * OIVIOE INTO Ble & Bos a 
SCRE PEERY SRR Sp a app a ap a SE ae ae a a eh: 
S353 REM 

S468 GOSUBLIEEE SALS="" :FORK=1 TORL 

=41 GET#1 .BS 

S415 IFLEH<B$o=8@ THEM Bs=" " 


IFE$=CHRS¢ 13> THENBS=""«-" 
S420 IFBS=CHRS¢343THENBS="@" 
Al$=A1$+6¢ : IF ST=64THENK=RL 
S450 HEMT :B1$="" :A=LEMCALS> 


POSITION CURSOR 


HELM LINE 


agi ITFASRL—-1 THENALS=ALS+LeEF TS sre .RL-A® 

s468 JTFFR? 1 THEHBIS=LEFTS* AL1#,.FB-1 > 

S47 B2s=(MIOS(A1S,FR 9 

S475 RETURN 

24°95 REM 

S456 REM s:3obsokddioar sha eR 

S435 REM * POSITICN CURSOR TO BN & * 

3496 REM *® PRINT "+" OW GRIO # 

SESE. PRET] 355: oe Ep: a a BE a aE ee a a a a a OE 

S438 REM 

SSG A=IHTORN1e+29 sR=A-INTCPBA1a+25: REM ROW HUMBER 
S516 PS=ITHTSOCBN-1e-Ade1 e+e > RET COL HUMBER POSITIONS 


S52 
ss3e 
Ss4a 
Sosa 


See 
Vy oot 
tet et Bel 


R=6+2eR 1C=7+24P5 


PRINT"4ACCL CUI" > 
RETURH 
REM 


n 
I 


GOGgmtaaagarananaune 


REM *# REAC 
REM 
REM 


ALS=BiLS+B2s 
FORK =1TOLB 


RS=BS+RF 

HET 
PRINT#1 BS: :GOSUB1LGEE 
RETURM 
REM 


YOM BME Oe io oo 


REM # 


ow AO SOD Oy 1 Oi Or 1 Ty Or 1 Oy Or CN ON i 


Bip Oh Oo he to Wo oo oo 


REM 


ANAM HAO OO Oe oo on en 


a 
Dea} 


PRIWNTTMS" THIS 
PRIHTFILES 
PRIHT"EQITEQ It 
PRIHT'THE BYTE BEING 
PRINT" ANG 


~J mJ 


TG re OA oe on 


~J 


5 Bs ee Ne | 
mim me tm eo 
mm 


= gt 
(al ia! 


4 
I 
Gr 


PRINT" 
PRIHWT" 
FRIWT" 
PRIA” “Henke 
PRINT’ "GLE + 
PRINT"TO ENTER RECORD, 


& ~ 


ka = Gd 


oP 
SI 0) Mr 


H PRINT"EQITOR AS *+*, 


PORESS463,14:PRINT" CHOMEI" TABS L29LEFTS( PRPs. 559 TMSTABS 12> 
IS AH EDITOR FOR RELATIVE FILES. 

HAW ING MORE THAN 9G BYTES 
SECTIONS 
EQITED 1s 
THIS POSITION CAN BE MNOVWED 
PRINT’ REGULAR CURSOR CONTROL CHARACTERS. "TMS 
FRINT'FOLLOWING COMMAMOS ARE ALSO OPERATIVE :—" 
e CHAMGE RECORD # 

TO WEST RECORO, 
ENTERING SCREEH 
CHANGE BITE RANGE 
EXIT FROM EDITOR’ TH 


PRIHWT"TO CHAWGE FILEMWAME. HIT 
Triée PRIHT CARRIAGE RETURHW IS 
ANC 


PRINT" CCLRI"LEFTS( ADS, ROLEFTS ACS,Co + 


FRED S399 3 9 9p: ab a aE aE Ea MDE ESE EO a MD EE EH 
BiséB2s INTO 
39: ME IRIE SPE SE SE ES EE a a a he 


RECORO #® 


RECORD#1. (REC® :GOSUBIBEE rRS="" 


AS=LEFTS( ALS. 19 sALS=MIOS( ALS. 29> 
IFAS="<" THENAS=CHRS* 135 
IFRS="%" THEMAS=CHRS« 34 5 


FREED) S595 3: a ape aR ae ae aE a a a a a a ME 
INSTRUCT IONS bs 
FREI S855 9 ESE EH RO a aE: 


"CRYSI® FINIT #" 


CAN BE 

OF UF TO Se BYTES. "TM 
MARKEO By “4° 

BY THE 


MITHOUT 


HIT SHIFTEO CARR.RET. 
“@" ANDO “CR "TMS 
DISPLAYEC BY’ THE 
QUUTES AS A HEART. 


Se PRIHT"CCO,68CR.RVSIHIT ANY KEY TO CONTINUE! COU] ss 


Me POREISS, 


HM FPOREISS A sWALTi se. 1 sPOKESS46a,12 


B:PRIHT' CHOMEI" :sRETURH 





DOS - REP - MIX 


One of the most useful Utility Pro- 
grams for the Disk Drive is the 
“Universal Wedge” also known as 
“Dos Support’’. It makes all disk 
handling and program loading very 
easy. 

Another extremely useful program 
is ‘““Repeat’”’ (The Pet Revealed, page 
132). It is absolutely essential for fast 
editing. 

Since both programs are in constant 
use, I decided to make a composite for 
convenience. Naturally, a few pro- 
blems had to be resolved:- 


1) The second cassette buffer 
should remain free for all those 
little routines, that appear in the 
‘‘Newsletter’’. Therefore the 
routine had to be relocated to 
sit in the first cassette buffer. 

2) A command had to be provided 
for turning the repeat function 
off. The Pet runs faster without 
Repeat, and with the ‘“‘Repeat”’ 
activated some commands’ such 
as ““DLOAD” do not work pro- 
perly. 

3) Having a notoriously bad 
memory, I wanted to display the 
proper ‘SYS’ command(s) every 
time the program is loaded. 

I came up with the (BASIC4 Version) 


shown in figure 1. 
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The “Repeat”? function is activiated 
by ‘SYS635’ and deactivated by 
‘SYS720’. 

The train of ‘“‘ea’’s’ (NoOp; $208C 
to $02A5) is for those, who like to fool 
around with the interrupt routine. 

It is easy, for example, to change 
the display mode without having to 
POKE something or other (I forgot 
the exact numbers). Just put 
C9 07 DO 05 A2 0C 8E 4C E8 C9 OE 

DO 03 8D 4C E8 
into locations $028C to $029B and 
the square brackets ( , ) will take care 
of changing Graphics to Lower Case 
and visa versa. 

Another possibility is to use the 
‘STOP’ key to deactivate Repeat in- 
stead of SYS720 . Write following se- 


3] 


quence into locations $029C to 
$02A2:- 

C9 04 DO 05 20 DO 02 
The completed program now looks 
like figure 2. 
Now for the actual merging of 
“DOS” with ‘‘Repeat’’:- 

If you have the “Universal Wedge”’ 
Program, that works for both 
BASIC2 & 4, then load the program, 
but DO NOT RUN IT. Enter the 
Repeat program with TIM (type 
SYS4, .M 0278 02D8, etc). Now exit 
from the Monitor and list your pro- 
gram. It should look like figure 3. 
The Machine Languages Loader for 
the wedge program is located from 


$0500 to $08AD. Editing the Basic 
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Continued on next page 





Continued from previous page 


program will displace the lower up- 
wards. To relocate it into its original 
position, enter following commands 
in direct mode: 


FOR K=1 TO 120: IF 
PEEK (1280+K) < >234 THEN 


NEXT (return) 
FOR J=1280 TO 2225: POKE 
J,PEEK (J+ K): NEXT (return) 


Now enter the monitor (SYS 4) and 
save the program with the com- 
mands: 

S “0: DOS-REP-MIX 
**,08,027A,08AF 

Exit from the Monitor, type ‘RUN’ 
and you are in business! 

For those, who have BASIC2 with 
the old version of DOS (displaying all 
the instructions on the screeen), I 
should suggest following procedure: 


1. Enter the ‘Repeat’ program, taking 
care to change following bytes: 


Change to 
#$2E 
H#3E6 


Location Contents 
$02B0 #$55 
$02B1 H$E4 
$02D2 #$55 H#$2E 
$02D6 H$ #$E6 


2. If you want to keep the original 
display of the instructions, you can 
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15 rethensvsililsrem kasicd 
2H print" SSR Eee! Universal dee supeort LloacdeciEl" 
26 print” activate rereah with svseé Sig" 
$6 print” deactivate rep. with etc BeBe" 
SA rey 
ree sacl 
save ‘Repeat’ program with the and change them using the editor to: 


monitor, but be careful to save all 
bytes to $03FF (.S ‘‘0:REP”’ 
,08,017A,03FF) and then append this 
to the DOS program using the COPY 
command 


(OPEN1,8,15:PRIN T#1,“CO: 
DOS-REP-MIX =0:PET DOS 
SUPPORT ,0:REP’’). 

3. You might wish to include instruc- 
tion for ‘Repeat’. In this case list lines 
250 to 260: 

250 print”? special commands start in 
col 1 and 

260 print” are followed by a 2040 
filename. 

ready. 
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250 print 
260 print”’ 


sys635 activate repeat ”’ 
stop deactivate repeat ”’ 


Be careful with the number of spaces 
at the end of each line! They are in- 
cluded to keep the length of the 
BASIC program constant. To check 
this, peek locations 1792 & 1793. You 
should get 234 & 230 respectively. 
4, Save the program with the Monitor 
(.S =“: DOS-REP-MIX 
””, 08,027A,0900). 

In conclusion, I believe you will 
find that the time spent for entering 
this utility is very well compensated 
for by the pleasure you will have us- 
ing it. 


SCREEN PRINT (BASIC 4) 


mt 
| 
Ld 
i hy: ae ae EY 
Tt pe 
f “eae 
ma tT oF 
ei a Oa Ry 2. Ret ee ST ect PTE a PY eet Pas 
"1 “Th 
foe Fmd TG 


a oat 
“Tt pete TPP a a fale hte Be. 


"tr fet 
a aLTE OS 


Vt I scene 


“Li Wy fale 

Pry et i fe. 
1 Et 
Eh 2d 


eee 
Lfp pete Lee OS haa! 
2s 


ped TPIT fa Et 


it MH 
t - 3 Fe | 

A Sree t 4 
eA i et ict 


: 


+33 a 


-li ¢ 
fis Eat 
foovele 


ds. PRlp 2 


3 £33 


o 


St EE? pete eet Pe Ae fale EP Tp 
ce Pa OTE TE fee Cl eee ee Oh 


at PP LLP eee OTE ED ee ate TP Lat 


t 
‘= 
veces 
fg 
ste 


? 

ae 

soe 

waa 

str"; £ es 
i 3 

eat 

ae 

fone 


Bye Met 


ceed 
wl 


Et Prd fa pete eee TE eee UR RP Ti i 


for “Dr Be fea Beth 
mo 
13 


gr: 
ab at Wea f 


oe mbt 
a 
fi Ls. 


pie he ble f 


hy gh 


ageae™ 
- 


Mm fa Te a ho bet et TT 


mbt TE «, 
ie ie we = LF 
wP BS Be Ot 

Ei = 


ef bot fal eed my me 


ge 
wt fot f."3 


a2 Rpt 
| aes 
canbe 
a Be 
EERE LS 


oy Fy a 
i “Ti Seesedo ft Sm 
Tht 
¢ 0 “i tga tgs Ee. 
tty ft La 
‘eset ‘cocks 
Roe Coat 

ees 
eae 
bs eae 
‘ered 


AS es 
STi on * 


ae Bue eee ad 


“ign FRO: 


met! 


Mie HE Go Bb Oe Be ee 


Only Bytes 0349 and 034C have to be changed in 
order to make the screen dump work on Basic 4. 


BUY IT WRITE AWAY! 


PAGEWRITER is a machine code word processor crammed into a single 2k chip! Obviously 
in a mere 2k we couldn't fit all of the facilities of WORDPRO, WORDCRAFT, or our own 

MICROSCRIPT, but you'll be pleasantly surprised to find how powerful and easy-to-use 

it is! 


PAGEWRITER doesn't limit you to a 40 or 80 character line length, but scrolls the 
screen left or right, up or down as the cursor nears the edge. In fact, the 
electronic 'page' that you type onto can be up to 240 columns wide and up to 191 
lines long (subject to memory size). 


PAGEWRITER prints out your text exactly as you see it on the screen! There are no 
margin or tab settings to worry about. When writing or editing a document all the 
normal cursor controls may be used - and in control mode PAGEWRITER has more 
sophisticated functions enabling you to DELETE or INSERT a LINE, or MOVE a BLOCK of 
text. If you use the CBM 3022 or 4022 printer then PAGEWRITER gives you full control 
over the programmable character - as many as 26 characters can be defined at any time 
(a pre-defined set is included in the chip). 


When you've finished writing you can SAVE text to cassette or disk. The whole thing 
is really so amazingly simple that you'll wonder why nobody thought of it before! 
And remember, because PAGEWRITER is written entirely in 0502 machine code it's FAST! 


PAGEWRITER is available to fit in any spare ROM socket of an 8, 16 or 32k PET with 
New Roms or Basic 4 (please state socket & model when ordering). And the best thing 
of all is the price, just £39 plus VAT! 


F wid PAGEWRITER is also available in a 4k chip with ARROW, the chip that can LOAD, 
SAVE, VERIFY and APPEND at 6 to 7 times normal speed. ARROW on its own is £30 plus 
VAT, the two together cost £69 plus VAT. 


ALSO IN OUR NEW CATALOGUE.... 


SUPERSORT (£40) heads the list of new utilities in our latest catalogue. Whereas 
MULTISORT (£25) will sort a string array and move a number of other string arrays 
around in parallel, SUPERSORT handles numeric arrays too, and will sort on one field 
within another all the way down the line. 


DISK SEARCH 2 (£40) is an improved version of another powerful utility. If you need 
to search a RELATIVE FILE all you have to do is put the strings you are looking for 
into an array - then call up DISK SEARCH 2. You can request records that contain ANY 
ONE of the strings sought - or just those that contain ALL of the them. Why buy a 
database program when with DISK SEARCH 2 you can design your own’? 


MAKRO DISASSEMBLER (£25) is a true disassembler - it will take a machine code program 
apart and turn it into ASSEMBLER SOURCE CODE complete with labels! If you own MAKRO 
ASSEMBLER (£50) you can then make changes and re-assemble the code - just as if it 
was one of your own programs! And we've developed a special version of MAKRO with a 
find-and-replace facility that you'll find particularly useful (put in your own 
labels etc). MAKRO-XR is available as an upgrade to the standard MAKRO at a cost of 
Just £10, 


First Floor, tO—14 Canning Road, Wealdstone, 
Harrow, Middlesex, HAS 7SJ, England 
Telephone: 01-861 1166 
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CHIP SHOP 
EDEX 2.0 & 4.1 


adds commands to BASIC for use within your Program 


IF THEN ELSE @ PLOT @ BEEP @ PRINTUSING @ SWAP 


MERGE @ HARD COPY @ PLUS A RANGE OF TOOLKIT 
TYPE FUNCTIONS AND A FAST EDITING SYSTEM 


EDEX is an extension to BASIC which considerably enhances the potentialities of the Commodore PET/CBM 
It consists in a 4K-BYTE ROM which installs inside the PET/CBM. 


EDEX is compatible with Commodore disk devices as well as with the DOS Support Program. 
EDEX operation is fully transparent towards the Microsoft Basic Interpreter 
EDEX is fully compatible with prior programs written without EDEX. 
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AUTO 

Activates automatic line numbering. 

APPEND * 

Allows thecreationofaprogram withasubroutine library 
BEEP 

Gives a sound of programable pitch and duration 
CALL 

Calls a machine language subroutine with transmission 
of up to 16 arguments 

DELETE 

Allows multiple line suppression 

DUMP 

Lists all variables ina program, together with their values 
EDITING * 

e.g.@ M prints MID$ 

ERROR 

Shows where an error has occurred 

FIND 

Lists all lines where a given character string is present 


EDEX 2.0 for use with BASIC 2 40 Column Pets £39.50 


HARD COPY 0 
Dumps screen to printer 


IF THEN ELSE 

With up to 16 nested conditions 
MERGEO 

Merge two programs files 

PLOT 

Plots curves of 50 x 80 or 160 resolution 
PRINTUSING 

Formats printing on screen or any printer 
RENU 

Program renumbering 

RESET 

Suppresses a dot (contrary of PLOT) 
SWAP 


Swap one program for another keeping variables 
TRACE 0 
Single line execution (displayed at top of PET) 


* EDEX 2.0 only 0 EDEX 4.1 only 
EDEX 4.1 for use with 80 Column Pets £49.50 


Available shortly for BASIC 4 40 Column PETs 


MULTEX 


IEEE-488 PACK 


POWERFULL 


6 (C= 7] © 


~ BUS CONTROLLER 


The end of instrumentation's problems. It resolves all kind of troubles: 
- Time-out 
- Special characters (“null”, and so on...) 
IEEE-PACK allows the use of IEEE-488 Universal Commands: 


-DCL (Device clear) -SDC_ (Selective device clear) 

-SPE (Serial poll enable) -SPD_ (Serial poll disable) 

-LLO (Local lockout) -GTL_ (Goto local 

-PPL_ (Parallel poll -PPU_ (Parallel poll 
configure) unconfigured) 


|IEEE-PACK also allows BASIC interrupt with functions: 


- ONKEY “x”, line number 
- ONSRQ line number (On Service Request) 


|EEE-PACK comes complete with two ROMs. £89.50 








MULTEX allows several CBM 8032 to work together on the same 
peripherals. 


MULTEX isa ROM which replaces a ROM of the CBM 8032. 


Except the substitution of this ROM no other modification is 
required on the CBM 8032. 


MULTEX is much cheaper than any other system. 


MULTEX £69.50 


DINERS ALL PRICES INCLUDE V.A.T. & P.P. ANIERICAN 
J. [Din | AVAILABLE FROM ALL GOOD DEALERS OR DIRECT FROM eS 


AUDIOGENIC, P.O. Box 88, 34-36 Crown Street, Reading, Berks. Tel: Reading (0734) 595269 


